创建系统还原点

发表于2009-09-20由Burgess Lee

保存下面代码为CreateRestorePoint.vbs文件，双击即可。
也可以放到开机启动项里或登陆脚本里。

CONST DEVICE_DRIVER_INSTALL = 10
CONST BEGIN_SYSTEM_CHANGE = 100
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\default")
Set objItem = objWMIService.Get("SystemRestore")
errResults = objItem.CreateRestorePoint _
("Scripted restore", DEVICE_DRIVER_INSTALL, BEGIN_SYSTEM_CHANGE)
Wscript.Echo errResults

P.S.微软还有好多脚本呢，自己去看吧！

http://www.microsoft.com/china/technet/community/scriptcenter/default.mspx

关于Burgess Lee

人能常清静 天地悉皆归
此条目发表在工具收集分类目录，贴了标签。将固定链接加入收藏夹。