创建 WshRemote 对象。
object.CreateScript(CommandLine,[MachineName])
CreateScript 方法返回 WshRemote 对象实例的句柄。脚本名中的路径部分未必是本地脚本 它可以引用网络共享上的脚本。这使您能坐在一个计算机系统旁,从另一个计算机系统检索脚本,然后在第三个计算机系统上运行它。如果未提供计算机名,远程脚本对象将在控制器计算机系统上运行(这是默认设置)。如果提供了计算机名,则远程脚本对象将运行于命名计算机系统之上。CreateScript 方法建立与远程计算机系统之间的连接,并对其进行设置以运行脚本,但是在您调用 WshRemote 对象的 Execute 方法之前,实际上不会启动脚本。
下面的示例演示 WshController 对象的 CreateScript 方法如何用于创建 WshRemote 对象(远程脚本的实例)。
Dim Controller, RemoteScript
Set Controller = WScript.CreateObject("WSHController")
Set RemoteScript = Controller.CreateScript
("test.js", "remoteserver")
WScript.ConnectObject RemoteScript, "remote_"
RemoteScript.Execute
Do While RemoteScript.Status <> 2
WScript.Sleep 100
Loop
WScript.DisconnectObject RemoteScript
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
var Controller = WScript.CreateObject("WSHController");
var RemoteScript = Controller.CreateScript
("test.js", "remoteserver");
WScript.ConnectObject(RemoteScript, "remote_");
RemoteScript.Execute();
while (RemoteScript.Status != 2) {
WScript.Sleep(100);
}
WScript.DisconnectObject(RemoteScript);
function remote_Error()
{
var theError = RemoteScript.Error;
WScript.Echo("Error " + theError.Number + " - Line: " + theError.Line + ", Char: " + theError.Character + "\nDescription: " + theError.Description);
WScript.Quit(-1);
}
CreateObject 方法 | CreateScript 方法 | WshRemote 对象 | Execute 方法