-
曳白
发布于 2009-07-26 23:54
-
收藏
复制代码 代码如下:On Error Resume Next Set outstreem=Wscript.stdout If (LCase(Right(Wscript.fullname,11))="Wscript.exe") Then Set objShell=Wscript.CreateObject("Wscript.shell") objShell.Run("cmd.exe /k cscript https://nologo "&Chr..