Hi, i am using a script for creating a system recovery point. This script works for Win 7, but not on Win 8.1
can anyone help me adjust the script, so it work also for Win 8.1, or give me any other script to do it?
here is the script that works for Win 7:
'------------------------------------------------------'Create an instant System Restore Point under Windows 7
'------------------------------------------------------
If WScript.Arguments.Count = 0 Then
Set oShell = CreateObject("Shell.Application")
oShell.ShellExecute "wscript.exe", """" & WScript.ScriptFullName & """ Run", , "runas", 1
Else
Set oWshShell = WScript.CreateObject("WScript.Shell")
oWshShell.Popup "Creating a SystemRestore point. Please wait.", 2, "System Restore", 0
swinmgmts = "winmgmts:\\.\root\default:Systemrestore"
GetObject(swinmgmts).CreateRestorePoint "Scheduled Restore Point", 0, 100
MsgBox "System Restore Point created", 0, "System Restore"
End If