利用vbs设计自动关机脚本(win)

AI摘要本段代码是一个简易的VBScript定时关机工具,通过输入特定时间实现自动关机。运行时弹窗要求输入关机时间,格式需为“时:分:秒”,确认后调用系统命令安排关机任务,并提示成功或取消。格式错误会弹出警告。

Dim time,mousedown
time=InputBox("请输入你想关机的时间"&vblf&"格式(20:10:05)必须是英文下的:","定时关机")
Set wshshell=wscript.createobject("wscript.shell")
If IsDate(time)=True Then
wshshell.run "at "&time&" shutdown -s"
mousedown=MsgBox("定时成功!电脑将在"&time&"关机!如果想放弃关机单击‘取消’!",vbokcancel,"定时关机")
If mousedown=vbcancel Then
wshshell.run "at /delete /y"
MsgBox "关机已取消!",64,"定时关机"
End If
End if
MsgBox "输入格式错误,请重新输入","定时关机"

纪小年

Jing

您可能还喜欢...

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

这个站点使用 Akismet 来减少垃圾评论。了解你的评论数据如何被处理