vbscript - VBScript中的CMD

Question

我想编写一个简单的 vb 脚本来自动关闭 Windows。

我使用的代码是：

Dim ti
ti=InputBox("enter time in minutes")
ti=ti*60
Set objShell=CreateObject("WScript.Shell")
objShell.Run "cmd shutdown /s /t "& ti & " "

但是当我输入时间并按 enter 时，我得到的只是一个命令提示符窗口，没有任何反应

我什至尝试通过设置时间的默认值并指定 shutdown.exe 的完整路径，但似乎没有任何效果

  Set WshShell = WScript.CreateObject("WScript.Shell")
  Command = "C:\Windows\System32 shutdown.exe -s -t 600 "
  WshShell.Run Command

你能纠正我并指导我正确的代码....

score 3 · Accepted Answer

看起来您的路径中缺少反斜杠：

  Set WshShell = WScript.CreateObject("WScript.Shell")
  Command = "C:\Windows\System32\shutdown.exe -s -t 600 "
  WshShell.Run Command

score 1 · Accepted Answer

如果要在其中运行命令，cmd则必须使用/k（命令完成后保持cmd窗口打开）或/c（命令完成后关闭cmd窗口）。这是执行此操作的规范方法：

ti = InputBox("enter time in minutes")
ti = ti * 60
CreateObject("WScript.Shell").Run "%COMSPEC% /c shutdown -s -t " & ti

%COMSPEC%是一个系统环境变量，其路径为cmd.exe.

2 回答 2