fortypoundhead.com

Create a System Restore Point with VBscript

Posted On 2013-10-25 by dwirch
Keywords:
Tags: Scripting Tip VBScript Windows Windows Server 2012 Windows Server 2008
Views: 577


This handy little VBscript to create a system restore point can be encapsulated in a function, and can save you from yourself.

Lets say you're performing some automated functions on a group of machines.  Some of these operations might be changing/adding/deleting registry files, or making changes to drivers, or even (gasp!) fiddling with key system files.  One way to protect yourself is to perform a backup or image of the machine before starting.

But there is another way.  You can leverage the built-in feature of Windows to create system restore points, which will allow you to back out any changes that might have backfired in your script.  Watch out for line wrap below:

CONST DEVICE_DRIVER_INSTALL = 10
CONST BEGIN_SYSTEM_CHANGE = 100
strComputer = "TARGET COMPUTERNAME HERE"
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default")
Set objItem = objWMIService.Get("SystemRestore")
errResults = objItem.CreateRestorePoint("Scripted restore", DEVICE_DRIVER_INSTALL, BEGIN_SYSTEM_CHANGE)

There you go.  Pretty straightforward, yes?  Hope this helps you out.


About the Author

dwirch has posted a total of 172 articles.

 


Comments On This Post

No comments on this post yet!


Do you have a thought relating to this post? You can post your comment here. If you have an unrelated question, you can use the Q&A section to ask it.

Or you can drop a note to the administrators if you're not sure where you should post.


Your IP address is:54.157.200.1

Before you can post, you need to prove you are human. If you log in, this test goes away.



Recent Forum Posts

Job Spammer: Sathya Narayana
dwirch posted on March 15, 2017 at about 7:18 in Spammers

Job Spammer: Manish Kumar
dwirch posted on March 14, 2017 at about 17:44 in Spammers

Site Migration Complete
dwirch posted on March 12, 2017 at about 11:10 in Site News

Site Migration Complete
dwirch posted on March 11, 2017 at about 0:35 in Site News

Job Spammer: Jason Weinstein
dwirch posted on March 10, 2017 at about 14:00 in Spammers

Job Spammer: Ryan Wilson
dwirch posted on March 8, 2017 at about 17:00 in Spammers