LOTUSSCRIPT/COM/OLE CLASSES
Examples: SendConsoleCommand method
This agent sends a console command to a server.

%INCLUDE "lsxbeerr.lss"

Sub Initialize
 On Error Goto handler
 Dim session As New NotesSession
 serverName$ = "mjr"
 consoleCommand$ = Inputbox$("Type command:", _
 "Send console command")
 consoleReturn$ = session.SendConsoleCommand( _
 serverName$, consoleCommand$)
 Messagebox consoleReturn$,, consoleCommand$
handler:
 If Err() = lsERR_NOTES_ERROR Then
   Messagebox "Could not access server",, _
   "Send console command"
 Else
   Messagebox Error(),, Err()
 End If
 Exit Sub
End Sub

See Also