如何远程执行vbs,求助
vbscript吧
全部回复
仅看楼主
level 5
cmetl 楼主
dim objwbemlocator
dim objwmiservice
dim objprocess
dim intprocessid
dim objstartup
dim objshell
set objshell =createobject("wscript.shell")
objshell.run "cmd /c net use \\192.168.116.205\ipc$ "123456" /user:"domain\username""
set objwbemlocator=createobject("wbemscripting.swbemlocator")
set objwmiservice = objwbemlocator.connectserver("192.168.116.205","root\cimv2","domainname\username","123456")
set objstartup =objwmiservice.get("win32_processstartup")
set objconfig =objstartup.spawninstance_
objconfig.showwindow=9
objconfig.priorityclass=64
set objprocess = objwmiservice.get("win32_process")
objprocess.create("wscrip.exe c:\target.vbs","c:\windows\system32",objconfig,intprocessid)
执行结果,远程计算机192.168.116.205新增了wscript.exe进程,但目标vbs未正真执行,求懂的行家帮忙,谢谢。
2015年07月20日 07点07分 1
level 5
cmetl 楼主
最后一句改下:objprocess.create("wscipt.exe target.vbs","c:\",objconfig,intprocessid)
本机执行没有问题,可能是远程执行时权限问题
2015年07月20日 07点07分 2
level 5
cmetl 楼主
此贴终结,此代码可以远程执行脚本,windows处于安全考虑,不显示界面,只在后台跑
2015年07月21日 06点07分 3
1