定时关机代码,VBS代码库,德仔网

代码语言

代码分类

【VBS】定时关机

作者:空云万里晴 / 发布于2012/11/26/ 1592

restTime =inputbox("请输入关机时间（单位：秒）","定时关机","600")
if restTime = "" then wscript.quit
Dim i
Set Tips = CreateObject("WScript.Shell")
For i = restTime To 1 Step -30
    Con = Tips.popup ("当前时间剩余" & i & "秒,每30秒更新一次",30,"计时",2)
    If Con = 3 then wscript.quit
Next
Set Finally = CreateObject("WScript.Shell")
Finally.popup "10秒后关机",1,"计时",0
Set Tips = Nothing
Set Finally = Nothing
set WSHshell = wscript.createobject("wscript.shell")   
WSHshell.run "cmd.exe /c shutdown -s -t 10"

试试其它关键字

　定时关机　

同语言下

.使用脚本将域账号添加到客户机的本地管理员组
.删除服务器上文件
.主动ping服务器是否宕机
.自动服务器检查的vbs脚本
.VBS脚本发送邮件，密送多人，带附件，可更换账号密码
.根据文件路径复制文件
.VBA操作数据库
.双击获取公网IP到剪贴板
.定时运行ie浏览执行网址不显示浏览器窗口
.批处理生成日历

可能有用的

.C#实现的html内容截取
.List 切割成几份工具类
.SQL查询多列合并成一行用逗号隔开
.一行一行读取txt的内容
.C#动态修改文件夹名称(FSO实现，不移动文件)
.c# 移动文件或文件夹
.c#图片添加水印
.Java PDF转换成图片并输出给前台展示
.网站后台修改图片尺寸代码
.处理大图片在缩略图时的展示

空云万里晴贡献的其它代码(5)

.定时关机
.Java 实现单链表
.银行家算法模拟资源分配
.复数运算
.数组合并