'Create RPC client object

Set RPCClient = WScript.CreateObject("RoutixRPCClient.Root")

'Set connection information

RPCClient.Host = "localhost"

RPCClient.Port = 40404

RPCClient.UserName = "Administrator"

RPCClient.Password = "password"

'Connect to server

RPCClient.Connect

'Query remote object from server

Set RemoteObj = RPCClient.QueryRemoteObject("WScript.Shell")

'Call

WScript.Echo "RemoteObj.CurrentDirectory: " & RemoteObj.CurrentDirectory

WScript.Echo vbCRLF & "Press any key..."

WScript.StdIn.Read(1)