System restore UDF

[FredAI]

Hi.

I needed this for one of my apps, and all I could find here was a WMI object function to create a restore point, so I decided to create this UDF and post it here.

It has functions to enumerate, delete (one or all) and create restore points.

Also enable or disable the system restore, and restore the system to one of the restore points.

There are only two functions available through DllCall on msdn, the others are WMI.

The UDF is not commented yet, I'll do it tomorrow and update. It's getting late, now. Better call it a night.

Sorry for the delay. Here's the commented updated version: (28 downloads before)

Note: Some functions were slightly modified.

Updated 15/11/2011 (66 total downloads). The $DriveL optional parameter in the _SR_Enable and _SR_Disable functions must be in the format $SystemDrive & '\', or the functions won't work.

SystemRestore.au3

Edited November 15, 2011 by FredAI

[FredAI]

Just a simple advice: Be careful when using the _SR_Restore function. It marks the chosen system restore to be performed on reboot, and I couldn't find any documentation on how to cancel it.

[BiliyomKi]

Thanks, its great

[ffdshow]

Function _SR_RemoveAllRestorePoints() doesn't work in Windows 8.

Edit: Sorry, I did a syntax error. It's working fine.

Edited May 14, 2013 by ffdshow

[firestrife23]

I tried this syntax _SR_CreateRestorePoint('Test Restore Point') but it doesn't work?

This is snippet of code I tried

#include <SystemRestore.au3>

_SR_CreateRestorePoint('Test Restore Point')

If @error = 0 Then
   MsgBox(0 + 64 + 262144, "Error", "Failed to create System Restore Point!")
Else
   MsgBox(0 + 64 + 262144, "System Message", "System Restore Point created successfully.", 5)
EndIf

Edited October 31, 2014 by firestrife23

[MikahS]

Remarks .......: The system restore takes a few seconds to update.

try

#include <SystemRestore.au3>
 
_SR_CreateRestorePoint('Test Restore Point')
 
Sleep(3000)
 

If @error = 0 Then
   MsgBox(0 + 64 + 262144, "Error", "Failed to create System Restore Point!")
Else
   MsgBox(0 + 64 + 262144, "System Message", "System Restore Point created successfully.", 5)
EndIf

[firestrife23]

MikahS,

Thank you for your suggestion but no luck so far... here's my another attempt, this time it come back as success.... however, when you run rstrui.exe to verify and it's not there as if it never got created in first place....

#include <MsgBoxConstants.au3>
#include <SystemRestore.au3>

CreateRestorePoint()

Func CreateRestorePoint()
   Local $pid = _SR_CreateRestorePoint('Test Restore Point')
   Do
      Sleep(3000)
   Until $pid = 0 or $pid = 1
   If $pid = 0 Then
      MsgBox(0 + 64 + 262144, "Error", "Failed to create System Restore Point!")
   ElseIf $pid = 1 Then
      MsgBox(0 + 64 + 262144, "System Message", "System Restore Point created successfully.", 5)
   EndIf
EndFunc

[MikahS]

 

MikahS,

Thank you for your suggestion but no luck so far... here's my another attempt, this time it come back as success.... however, when you run rstrui.exe to verify and it's not there as if it never got created in first place....

 

Hmm, I think I would have to delve deep into the UDF or hopefully the author can shed some light on the subject (last active in july though )

[hlawton]

Hi,

Thanks for the code ... Tried it in Win PE 7 with all the services running like VSS and such ... when i called the _SR_Enable("C:\") function it returned 0 ...

i also been trying to get it to enable in powershell and it fails there too saying it not system drive (but it is for sure) ...

I can get recenv.exe to do a computer restore point so i figured WMI would do it or PS ...

Any ideas on why it failing ?

 

[mLipok]

Please change:
_WMIDateStringToDate
to
__SR_WMIDateStringToDate

to be coherent with other function names and because this is internal function.

btw.
I modified it a little (to be more HumanReadabled) :
 

Func __SR_WMIDateStringToDate($dtmDate)
    Return _
            (StringMid($dtmDate, 5, 2) & "/" & _
            StringMid($dtmDate, 7, 2) & "/" & _
            StringLeft($dtmDate, 4)  & " " & _
            StringMid($dtmDate, 9, 2) & ":" & _
            StringMid($dtmDate, 11, 2) & ":" & _
            StringMid($dtmDate, 13, 2))
EndFunc   ;==>__SR_WMIDateStringToDate

 

[mLipok]

I just modified your UDF, a little

No breaking Changes (I hope).

SystemRestore.au3

 

Edited November 3, 2017 by mLipok

[Nunos]

On ‎11‎/‎3‎/‎2017 at 5:28 AM, mLipok said:

I just modified your UDF, a little

No breaking Changes (I hope).

SystemRestore.au3

 

Creating new restore points is not working anymore. 

#include "SystemRestore.au3"
_SR_CreateRestorePoint('New Restore Point')

Running the above shows Exit Code : 0 in the console but no new restore point is created. 

 

Any idea what may have changed?

[mLipok]

It is realeated to your system, as I have no problem (on my Win10Pro 64Bit) with this snippet:

#include "SystemRestore.au3"
_SR_CreateRestorePoint('New Restore Point - AUTOIT')

[Earthshine]

can also do it with command line

Wmic.exe /Namespace:\\root\default Path SystemRestore Call CreateRestorePoint "%DATE%", 100, 1

or 

Wmic.exe /Namespace:\\root\default Path SystemRestore Call CreateRestorePoint "%DATE%", 100, 1

as spelled out here.

https://www.winhelponline.com/blog/create-system-restore-point-script-windows-10-8-7-vista-xp/

 

powershell as well

https://www.winhelponline.com/blog/create-system-restore-point-script-windows-10-8-7-vista-xp/#powershell

 

Edited February 27, 2019 by Earthshine

[Nunos]

Thanks I will see if I can find out what is wrong.