vbs实现计算机重启
发布时间：2016-12-28 来源：查字典编辑
摘要：DimreturnSetR=CreateObject("WScript.Shell")return=MsgBox("你确定要重起计算机吗?"...
Dimreturn
SetR=CreateObject("WScript.Shell")
return=MsgBox("你确定要重起计算机吗?",vbokcancel+vbexclamation,"注意！")
Ifreturn=vbokThen
R.run("Shutdown.exe-r-t0")
Endif