[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[问题求助] VBS脚本如何结束OEXEC的代码?

  1. SET WshShell = CreateObject("WScript.Shell")
  2. WshShell.Run cmd /c ping /n 3 127.1&&for /f "skip=3 tokens=3 delims=. " %%a in ('tasklist /fi "windowtitle eq c:\windows\system32\cmd.exe"') do taskkill /f /pid %%a
  3. Set oexec = WshShell.Exec("cmd /c ping /n 100 127.1") '用上面的批结束本行
复制代码
上面是我写的,但第二行总是引号使用不对,哪位朋友帮忙改一下..

因为taskkill也是CMD命令,它先结束了自己的窗口,那它还怎么能结束别人的窗口?

TOP

回复 5# samsinn


是一个好方法,竟然不知道,多谢

不过,我的命令为什么无法结束呢?呵呵,爱钻牛角尖了..

TOP

本帖最后由 samsinn 于 2012-2-9 13:10 编辑
  1. SET WshShell = CreateObject("WScript.Shell")
  2. Set oexec = WshShell.Exec("ping /n 100 127.1") '用上面的批结束本行
  3. wsh.Sleep 3000
  4. oexec.Terminate
复制代码
你的意思是不是想设置几秒后结束exec的进程

TOP

引号已解决,但新问题是..

本帖最后由 lqh123108 于 2012-2-9 11:57 编辑

SET WshShell = CreateObject("WScript.Shell")
ml="cmd /c ping 127.1 /n 5&&for /f " & """" & "skip=3 tokens=3 delims=. " & """" & " %a in ('tasklist /fi " & """" & "windowtitle eq C:\windows\system32\cmd.exe" & """" & "') do taskkill /f /pid %a"
WshShell.Run ml
Set oexec = WshShell.Exec("cmd /c ping /n 100 127.1") '用上面的批结束本行

想用第二行提前结束第三行命令,但不行

TOP

' 注释掉了后面的语句

TOP

不伦不类

TOP

返回列表