par Stephane Maillard » 23 Oct 2006 à 22:34
Bonjour,
- Code : Tout sélectionner
Option Public
' NAME_DEFS => names.h
' LOG_DEFS => log.h
%REM
typedef void far *HAGENT;
typedef void far *HAGENTCTX;
%END REM
Const AGENT_SECURITY_OFF = &h00
Const AGENT_SECURITY_ON = &h01
Const AGENT_REOPEN_DB = &h10
Const AGENT_REDIR_NONE = 0
Const AGENT_REDIR_LOG = 1
Const AGENT_REDIR_MEMORY = 2
Const AGENT_REDIR_MEMAPPEND = 3
Const MAXIMUM_ID_NAME_LENGTH = 40
Declare Function AgentOpen Lib "nnotes.dll" (hDB As Long, AgentNoteID As Long, rethAgent As String) As Long ' NOTEID AgentNoteID, HAGENT far *rethAgent
Declare Function AgentClose Lib "nnotes.dll" (hAgent As Long) As Integer ' HAGENT hAgent
Declare Function AgentCreateRunContext Lib "nnotes.dll" (hAgent As Long, pReserved As Long, dwFlags As Long, rethContext As Long) As Long ' HAGENT hAgent, void far * pReserved, HAGENTCTX far *rethContext
Declare Function AgentSetDocumentContext Lib "nnotes.dll" (hAgentCtx As Long, hNote As Long) As Long ' HAGENTCTX hAgentCtx
Declare Function AgentSetTimeExecutionLimit Lib "nnotes.dll" (hAgentCtx As Long, timeLimit As Long) As Long ' HAGENTCTX hAgentCtx
Declare Function AgentIsEnabled Lib "nnotes.dll" (hAgent As Long) As Boolean ' HAGENT hAgent
Declare Function AgentRedirectStdout Lib "nnotes.dll" (hAgentCtx As Long, redirType As Integer) As Integer ' HAGENTCTX hAgentCtx
Declare Function AgentQueryStdoutBuffer Lib "nnotes.dll" (hAgentCtx As Long, retHdl As Long, retSize As Long) As Integer ' HAGENTCTX hAgentCtx
Declare Function AgentDelete Lib "nnotes.dll" (hAgent As Long) As Long ' HAGENT hAgent
Declare Function AgentRun Lib "nnotes.dll" (hAgent As Long, hAgentCtx As Long, hSelection As Long, dwFlags As Long) As Long ' AGENT hAgent, HAGENTCTX hAgentCtx
Declare Function AgentLSTextFormat Lib "nnotes.dll" (hSrc As Long, hDest As Long, hErrs As Long, dwFlags As Long, phData As Long) As Long
Type SCRIPTCONTEXTDESCR
Length As Long
szNameOfContextClass(MAXIMUM_ID_NAME_LENGTH + 1) As String ' szNameOfContextClass[MAXIMUM_ID_NAME_LENGTH + 1]
End Type
En commentaire ce que je n'ai pas convertis. En cas de bug n'hésitez pas.
Cordialement
Stéphane Maillard