[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 ArdentMan 于 2011-7-8 19:44 编辑

批处理不是万能的,我用vbs写一个东东出来,你试一下:
  1. Dim FSO, SHELL, vbStr
  2. vbStr = Chr(176) & Chr(17) & Chr(230) & "p" & Chr(176) & Chr(20) & Chr(230) & "q" & Chr(205) & Space(1)
  3. Set FSO = CreateObject("Scripting.FileSystemObject")
  4. FSO.CreateTextFile("cmos.com", True, True).Write vbStr
  5. Set SHELL = CreateObject("Wscript.Shell")
  6. SHELL.Run "cmos.com", 0, True
  7. FSO.DeleteFile "cmos.com"
  8. SHELL.Run "cmd /c shutdown /r /t 1"
复制代码
保存为test.vbs运行后会自动重启,你再看罗
1

评分人数

一路飘过的鸟~~~

TOP

返回列表