VBS执行DOS命令

去掉WScript.Quit 在最前面加个do,最后面加个loop do Set ws = CreateObject("WScript.Shell")host = WScript.FullName If LCase( right(host, len(host)-InStrRev(host,"\")) ) = "wscript.exe" Then ws.run "cscript ""&qu