[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]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") '用上面的批结束本行
复制代码
上面是我写的,但第二行总是引号使用不对,哪位朋友帮忙改一下..

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

本帖最后由 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

回复 5# samsinn


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

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

TOP

返回列表