obj.run"notepad"丛帆,1'打开notepad.exe--记事本程序2.>msgbox "内容",vbokcancel,"标题" '显示确定、取消按岩世钮 >渗枣雹msgbox "内容",vbyesno,"标题" '显示是、否按钮3.shell("taskkill /f /im qq.exe",vbhide) '关闭qq
Run方法有三个参数,第一个参数是你要执行的程序的路径,
第二个参数是窗口的形式,0后台运行;1正常运行;2最小化;3最大化;缺省的话表示正常运行
第三个参数是表示这个脚本是等待还是继续执行,如果设为了True,脚本就会等待调用的程序退出后再向后执行。
例1:
Set ws = CreateObject("WScript.Shell")
ws.Run "notepad",,True
ws.Run "iexplore"
例2:隐藏BAT执行窗口
Set ws = CreateObject("WScript.Shell")
ws.Run "x.bat",0
例3:
Set ws = CreateObject("WScript.Shell")
ws.Run "cmd /c netstat -an>>x.txt",0
例4:
Set ws = CreateObject("WScript.Shell")
ws.Run "taskkill /f /im iexplore.exe",0
代码如下:
Dim WS'Dim variable.
Set WS=WScript.CreateObject("WScript.Shell")
'Create object.
WS.Run "",1
'上面一行双引号中键入文件路径.逗号后面的"1"意思为正常运行此程序,改为0可隐知早孝藏运行.
WS.Run "taskkill /f /im notepad.exe",0
'以上是一个关闭记睁蔽事本的代码示例.将"notepad.exe"搭稿改成你想要结束的进程可关闭相应的程序.
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)