Question

VB自动关机命令

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t "XX" -c ""想停止关机请双击“解除自动关机”",0 ,true

我想在每次这个程序启动是 都能弹出对话框输入一个XX（就是多长时间以后关机）的值
那个输入之后没动静啊

Answer 1

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
xx=val(inputbox("请输入关机时间"))
WSHshellA.run "cmd.exe /c shutdown -r -t " & xx & " -c ""想停止关机请双击“解除自动关机”""",0 ,true

Answer 2

on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
xx=inputbox("请输入关机时间")
WSHshellA.run "shutdown -s -t " & xx & " -c ""想停止关机请双击“解除自动关机”""",1

Answer 3

直接一行代码就可以了,没必要用WSH
shell "shutdown -s -t "XX" -c"

Answer 4

-r 是重启，关机是-s