vbs定时关机

'══代══码══开══始════
set ws=CreateObject("wscript.shell")
'获得这个对象的句柄，用于下面的操作
do
'设置循环，不停监视时间
if abs(DateDiff("s",CDate("11:45:00"),time))<60 then
'判断时间是不是在要求范围内，即与11点45分接近
exit do'在时间范围内就退出循环
end if
wscript.sleep 1000*10'暂停脚本执行以节省系统cpu资源
loop'循环结束
ws.run "cmd /c shutdown -s -t 600 -c 系统将在计时结束关闭，请注意保存需要的文件",0
'调用shutdown命令关机
'══代══码══结══束═══