时间判断.vbs

Digital=time
hours=Hour(Digital)
minutes=Minute(Digital)
seconds=Second(Digital)
if (hours<6) then
dn=“凌辰了，还没睡啊？”
end if
if (hours>=6) then
dn=“早上好！”
end if
if (hours>12) then
dn=“下午好！”
end if
if (hours>18) then
dn=“晚上好！”
end if
if (hours>22) then
dn=“不早了，夜深了，该睡觉了！”
msgbox(“确认关闭电脑?”)
dim WSHshell
set WSHshell = wscript.createobject(“wscript.shell”)
WSHshell.run “shutdown -f -s -t 00”,0 ,true
end if
if (minutes<=9) then
minutes=“0” & minutes
end if
if (seconds<=9) then
seconds=“0” & seconds
end if
ctime=hours & “:” & minutes & “:” & seconds & " " & dn
Msgbox ctime