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: 622


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.162.19.123

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


Beat With A Stick List Returns: By request, BWASL has returned to the site. Free your rage by telling the world about something that really grinds your gears. Add your beating.



Recent Forum Posts

BWASL returns
dwirch posted on May 13, 2017 at about 15:24 in Site News

BWASL returns
dwirch posted on May 13, 2017 at about 8:46 in Site News

Job Spammer: Balashankar Bose Bose
dwirch posted on May 11, 2017 at about 10:05 in Spammers

Job Spammer: Bharti Jigyasi
dwirch posted on May 11, 2017 at about 7:58 in Spammers

List of Shady Characters
dwirch posted on April 25, 2017 at about 16:39 in Webmaster Stuff

Job Spammer: Bilal Uddin
dwirch posted on April 25, 2017 at about 11:00 in Spammers