vbs实现计算机重启
时间：2021-04-16 08:24:04|栏目：VBS|点击： 次
Dim return
Set R = CreateObject("WScript.Shell")
return=MsgBox ("你确定要重起计算机吗?",vbokcancel+vbexclamation,"注意！")
If return=vbok Then
R.run("Shutdown.exe -r -t 0")
End if
Set R = CreateObject("WScript.Shell")
return=MsgBox ("你确定要重起计算机吗?",vbokcancel+vbexclamation,"注意！")
If return=vbok Then
R.run("Shutdown.exe -r -t 0")
End if
栏 目：VBS
下一篇：vbs中实现启动两个应用程序，一直等到其中一个程序结束，然后关闭另一个？
本文标题：vbs实现计算机重启
本文地址：http://www.codeinn.net/misctech/102253.html
