Examples: SendConsoleCommand method

This agent sends a console command to a server.

%INCLUDE "lsxbeerr.lss"

Sub Initialize
  Dim session As New NotesSession
  serverName$ = "mjr"
  consoleCommand$ = Inputbox$("Type command:", _
  "Send console command")
  consoleReturn$ = session.SendConsoleCommand( _
  serverName$, consoleCommand$)
  Messagebox consoleReturn$,, consoleCommand$
End Sub