在本机运行vbs, 让远程计算机启动一个程序
2010-03-02 16:45
260 查看
使用WMI,MSDN上有个例子可以看一下,在本机运行vbs, 让远程计算机启动一个程序。
http://msdn.microsoft.com/en-us/library/aa389388(VS.85).aspx
程序名:RemoteRunProgram.vbs
Const SW_NORMAL = 1
strComputer = "."
strCommand = "Notepad.exe"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!//" _
& strComputer & "/root/cimv2")
' Configure the Notepad process to show a window
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = SW_NORMAL
' Create Notepad process
Set objProcess = objWMIService.Get("Win32_Process")
intReturn = objProcess.Create _
(strCommand, Null, objConfig, intProcessID)
If intReturn <> 0 Then
Wscript.Echo "Process could not be created." & _
vbNewLine & "Command line: " & strCommand & _
vbNewLine & "Return value: " & intReturn
Else
Wscript.Echo "Process created." & _
vbNewLine & "Command line: " & strCommand & _
vbNewLine & "Process ID: " & intProcessID
End If
http://msdn.microsoft.com/en-us/library/aa389388(VS.85).aspx
程序名:RemoteRunProgram.vbs
Const SW_NORMAL = 1
strComputer = "."
strCommand = "Notepad.exe"
Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!//" _
& strComputer & "/root/cimv2")
' Configure the Notepad process to show a window
Set objStartup = objWMIService.Get("Win32_ProcessStartup")
Set objConfig = objStartup.SpawnInstance_
objConfig.ShowWindow = SW_NORMAL
' Create Notepad process
Set objProcess = objWMIService.Get("Win32_Process")
intReturn = objProcess.Create _
(strCommand, Null, objConfig, intProcessID)
If intReturn <> 0 Then
Wscript.Echo "Process could not be created." & _
vbNewLine & "Command line: " & strCommand & _
vbNewLine & "Return value: " & intReturn
Else
Wscript.Echo "Process created." & _
vbNewLine & "Command line: " & strCommand & _
vbNewLine & "Process ID: " & intProcessID
End If
相关文章推荐
- 在本机运行vbs, 让远程计算机启动一个程序
- 编写一个可以自行启动的计算机,不需要在现有操作系统环境中运行的程序
- 运行safari提示:无法启动此程序,因为计算机中丢失 QTCF.dll
- 只启动一个程序实例,如果已运行则调到前端
- JAVA调用系统命令或可执行程序--返回一个Runtime运行时对象,然后启动另外一个进程来执行命令
- VC2005程序的一个运行错误 由于应用程序配置不正确,应用程序未能启动。重新安装应用程序可能会纠正这个问题。
- vs2010 运行时出现无法启动程序 拒绝访问的一个可能的原因
- Symbian 在一个运行的App中启动安装程序安装另外一个App
- 编译mysql c api 或者 mysql++ 程序成功,运行时却提示 程序不能启动,因为计算机找不到 dll(mysqlpp_d.dll/mysql.dll)
- VC启动一个程序并等待运行结束
- vs 项目编译运行报错:无法启动此程序,因为计算机中丢失 osg130-osgDB.dll。尝试重新安装该程序以解决此问题
- eclipse运行android程序,总是启动一个新的AVD模拟器,解决办法
- 在eclipse启动tomcat运行一个web程序,报java.lang.OutOfMemoryError: PermGen space
- 计算机必知必会:进程process与线程thread 进程定义为一个正在运行的程序的实例
- 计算机启动及程序运行
- 用C#给程序加启动画面并只允许一个应用程序实例运行
- vs编译成功生成exe后运行时,提醒无法启动程序,计算机中丢失xx.dll解决办法
- 用C#给程序加启动画面并只允许一个应用程序实例运行[转]
- caffe+vs2013运行时出现无法启动此程序,因为计算机中丢失opencv_core2410.dll
- 用C#给程序加启动画面并只允许一个应用程序实例运行