リファレンス、WScript オブジェクト、ConnectObject メソッド

まんま

Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript("2011112200.vbs", "remoteserver")
WScript.ConnectObject RemoteScript, "remote_"
RemoteScript.Execute

Do While RemoteScript.Status <> 2 
    WScript.Sleep 100
Loop

Sub remote_Error
    Dim theError
    Set theError = RemoteScript.Error
    WScript.Echo "Error " & theError.Number & " - Line: " & theError.Line & ", Char: " & theError.Character & vbCrLf & "Description: " & theError.Description
    WScript.Quit -1
End Sub

「ActiveX コンポーネントはオブジェクトを作成できません。」となるので、コマンドプロンプトで「wscript -regserver」を実行してみたが、やっぱり少し間があってから同じエラーメッセージ

「DisconnectObject メソッド」とばし