JSI Tip 8975. How can I create a Restore Point in Windows XP, from the command-line, or from a batch?

Thanks for the batch script.
For those who would like to make a system restore point directly in vbs please have a look to:
http://msdn.microsoft.com/en-us/library/aa378847%28VS.85%29.aspx

... or use the following vbs script.
----- begin---

' source:
' http://msdn.microsoft.com/en-us/library/aa378847%28VS.85%29.aspx

'CreateRestorePoint Method of the SystemRestore Class
'Creates a restore point. Specifies the beginning and
'the ending of a set of changes so that System Restore
'can create a restore point.This method is the
'scriptable equivalent of the SRSetRestorePoint function.

' call this script directly or per dos batch:
' cscript //nologo create_system_restore_msnlib.vbs my_description

' v0.1 100317 Thorsten Albrecht, confirmation box switch added
' tested in Windows 7 Professional x64, should work in xp, too

' restore system restore points with: rstrui.exe

'----------------------------------------------------
' user options:
show_confirmation = 0 '0: don't show any success window with confirmation button
' 1: display a confirmation dialogue after creating the system restore point

'----------------------------------------------------
Set Args = wscript.Arguments

If Args.Count() > 0 Then
RpName = Args.item(0)
Else
RpName = "created system restore point through vbs script create_system_restore_msnlib.vbs"
End If

Set obj = GetObject("winmgmts:{impersonationLevel=impersonate}!root/default:SystemRestore")

If (obj.CreateRestorePoint(RpName, 0, 100)) = 0 Then
result = 0 'success
Else
result = 1 'failure
End If

If (show_confirmation = 1) Then
If (result = 0) Then
wscript.Echo "Created system restore point successfully."
Else
wscript.Echo "Error while creating system restore point!"
End If
End If


-----end -----

Thorsten