vbs脚本 - 翼展电脑服务中心


一键清零.vbs

2018-10-6 乱云飞 评论(0) 浏览(1124) 标签: 一键清零 vbs代码 vbs脚本 自动输入脚本 

Dim WshShell
Set WshShell=WScript.CreateObject("WScript.Shell")
WScript.Sleep 2000
WshShell.AppActivate "_SSCOM"
WScript.Sleep 2000
WshShell.SendKeys "^{Z}"
WScript.Sleep 2000
WshShell.SendKeys "/1{ENTER}"
WScript.Sleep 2000
WshShell.SendKeys "N1{ENTER}"
WScript.Sleep 20000
WshShell.SendKeys "^{C}"
WScript.Sleep 5000
msgbox "                                      "& vbCrlf &"^_^ 清零完成，可以拔掉硬盘了。"& vbCrlf &"                                      ",0,"一键清零硬盘通电时间"
wscript.quit
预ICP备10086-001号 © 翼展网/80C.CC 技术支持/洛阳翼展科技
TEL / 13213610060 QQ / 345794501
Powered by emlog