调用局域网其他计算机程序的脚本

这个脚本可以直接在远程计算机上执行程序，对于需要远程执行任务的人来说比较方便。

1. str=inputbox ("输入命令")
2. strComputer ="10.100.3.68"
3. strUserName="administrator"
4. strPassword="master"
6. Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
7. Set objSWbemService = objSWbemLocator.ConnectServer(strComputer,"root/cimv2", strUserName,strPassword)
8. set c=objSWbemService.get("win32_process")
9. err=c.create("cmd.exe /c" & str,null,null,processid)
10. if str="" then
11.  wscript.quit
12. end if
13. if err=0 then 
14.    wscript.echo "创建成功" & vbcrlf & "进程ID:" & processid
15. else
16.    wscript.echo "创建失败" & vbcrlf & "错误代码:" & err
17. end if