One Step/One button to create a system restore point


nunya

Member
Member
Local time
12:58 AM
Posts
40
OS
Win 11
As the title suggests, is there a way to just create a current system restore point without sifting through menus? I did a quick search and nothing came up. Would it need to be a script?
 

My Computer My Computer

At a glance

Win 11AMD 7800X3D32GB Gskill DDR5-6400ASRock 7900XTX
OS
Win 11
Computer type
PC/Desktop
Manufacturer/Model
My Invisible Friend
CPU
AMD 7800X3D
Motherboard
Gigabyte B650i Aorus Ultra
Memory
32GB Gskill DDR5-6400
Graphics Card(s)
ASRock 7900XTX
Sound Card
Seriously, who uses a separate sound card.
Monitor(s) Displays
Right now, 10 year old Asus using HDMI
Screen Resolution
1920x1080
Hard Drives
C: 980 PRO 2T NVME, D: EVO 860 4T SATA, E: Samsung 256GB NVME(for now), Z: External Seagate 4T
PSU
CM 850W SFX
Case
Phanteks Shift 2 Air
Cooling
CM ML120
Keyboard
Logitech G915 TKL
Mouse
Logitech G502 Lightspeed
Internet Speed
1GPS up and down, or thereabouts.
Browser
Brave, mostly.
Antivirus
Whatever comes with Win11
Other Info
I accidentally clipped a turtle on a gravel road with my truck. I set it off to the side of the road next to a stream seeing how bad it was hurt, nothing was going to save it. I still feel bad about it.
You'll find many answers in the tutorials. In this case,
Create System Restore Point in PowerShell - ElevenForumTutorials
You can issue the commands in a PS window or put them in a shortcut so you can run it by double-clicking on it. You'll need to add powershell.exe to the start of the shortcut's Target field before the command itself.
But, as you have so recently agreed, System images are more reliable.


Best of luck,
Denis



Welcome to ElevenForum.

It's really worth making time to browse through the ElevenForum Tutorial index - there's a shortcut to it at the top of every ElevenForum page [within the Tutorials dropdown list].
- At the foot of the ElevenForum Tutorial index is a shortcut to download it as a spreadsheet.
- I download a new copy each month.
- By downloading it as a spreadsheet I can benefit from Excel's excellent filtering capabilities when I search for topics of interest.
- ElevenForum tutorials are also listed at Tutorials and there's a shortcut to that at the top of every page.

You can search ElevenForum using the search box in the top-right corner of all ElevenForum webpages or using Advanced Search - ElevenForum
- You can also search ElevenForum threads in many general search engines, such as Google, by adding site:elevenforum.com after your search term. For example,
Taskbar setup site:elevenforum.com
- [This is what the search box in the top-right corner of ElevenForum webpages does automatically]
 
Last edited:

My Computer My Computer

At a glance

Windows 11 Home x64 Version 25H2 Build 26200....
OS
Windows 11 Home x64 Version 25H2 Build 26200.8037

My Computer My Computer

At a glance

Windows 11 Pro 25H2 (Build 26200.8728)Intel Core Ultra 9 285 5.6 GHz32.00 GBIntel Integrated Graphics (128 MB)
OS
Windows 11 Pro 25H2 (Build 26200.8728)
Computer type
PC/Desktop
Manufacturer/Model
Dell Pro Max Tower T2 FCT2250
CPU
Intel Core Ultra 9 285 5.6 GHz
Motherboard
64-bit operating system, x64-based processor
Memory
32.00 GB
Graphics Card(s)
Intel Integrated Graphics (128 MB)
Sound Card
Realtek Audio
Monitor(s) Displays
Dell P2714H Monitor
Screen Resolution
1920 x 1080
Hard Drives
1 x 512GB M.2 XG10d SED KIOXIA PCIe solid state drive (Internal)
1 x 2TB Seagate ST2000DM008-2UB102 HDD (Internal)
1 x 1TB Seagate STGX4000400 External HDD
1 x 4TB Seagate STGX4000400 External HDD
1 x 6TB WD Elements AE 2689 External HDD
PSU
500 Watts
Cooling
Air
Keyboard
Microsoft Wired Keyboard 600
Mouse
Microsoft USB Basic Optical Mouse v2.0
Browser
Firefox
Antivirus
Windows Defender + Malwarebytes Premium
Other Info
BaseBoard Manufacturer Dell Inc.
BaseBoard Product 022RY57
BaseBoard Version A01
Code:
:: Add System Protection Context Menu in Windows 10 and Windows 11

@Echo Off

(Net session >nul 2>&1)||(PowerShell start """%~0""" -verb RunAs & Exit /B)

:_Start
Cls & Mode CON  LINES=11 COLS=85 & Color 0E
Echo.
Echo.       
Echo         Type (R) to Remove "System Protection" from Desktop Context Menu 
Echo.       
Echo.
Echo.
Echo.         
Echo         Type (E) to Add "System Protection" to Desktop Context Menu   
Echo.       



Set /p input= RESPONSE:
If /i  Not %input%==R (Goto :_Ex) Else (Goto :_Disable)

:_Ex
If /i  Not %input%==E  (Goto :_Start) Else (Goto :_Enable)





:_Enable

Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection" /v "MUIVerb" /t REG_SZ /d "System Protection" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection" /v "HasLUAShield" /t REG_SZ /d "" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection" /v "Icon" /t REG_SZ /d "rstrui.exe" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection" /v "Position" /t REG_SZ /d "Bottom" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection" /v "SubCommands" /t REG_SZ /d "" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\001flyout" /v "MUIVerb" /t REG_SZ /d "System Protection" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\001flyout\command" /ve /t REG_SZ /d "SystemPropertiesProtection.exe" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\002flyout" /v "MUIVerb" /t REG_SZ /d "System Restore" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\002flyout\command" /ve /t REG_SZ /d "rstrui.exe" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\003flyout" /v "MUIVerb" /t REG_SZ /d "Create restore point" /f
Reg.exe add "HKCR\DesktopBackground\Shell\SystemProtection\shell\003flyout\command" /ve /t REG_SZ /d "PowerShell -windowstyle hidden -command \"Start-Process cmd -ArgumentList '/s,/c, PowerShell Checkpoint-Computer -Description \"Manual\" -RestorePointType \"MODIFY_SETTINGS\"' -Verb runAs\"" /f


Cls & Mode CON  LINES=5 COLS=80 & Color 0E
 Echo.
 Echo.
 Echo            Adding "System Protection" to Desktop Context Menu

Ping -n 5  localhost > Nul

Exit





:_Disable

Reg.exe delete "HKCR\DesktopBackground\Shell\SystemProtection" /f

Cls & Mode CON  LINES=5 COLS=80 & Color 0E
 Echo.
 Echo.
 Echo            Removing "System Protection" from Desktop Context Menu

Ping -n 5  localhost > Nul
 

My Computer My Computer

At a glance

Windows 11AMD Ryzen 7 5700GMicron Technology DDR4-3200 16GBNVIDIA GeForce RTX 3060
OS
Windows 11
Computer type
PC/Desktop
Manufacturer/Model
HP Pavilion
CPU
AMD Ryzen 7 5700G
Motherboard
Erica6
Memory
Micron Technology DDR4-3200 16GB
Graphics Card(s)
NVIDIA GeForce RTX 3060
Sound Card
Realtek ALC671
Monitor(s) Displays
Samsung SyncMaster U28E590
Screen Resolution
3840 x 2160
Hard Drives
SAMSUNG MZVLQ1T0HALB-000H1
Search is your friend!

We've discussed this before!

All you need, is little script on your desktop, and click it to make a registry restore point.
I got mine on the Windows 10 forum, from @Brink. I edited it to work on Windows 11 and put it in my Startup folder, for an automatic, Daily, Restore point.

If you'll copy the following script, and paste it into Notepad, then save that as "CreateNewRestorePoint.vbs
you'll have something you can use whenever you want.

' Created by: Shawn Brink
' Ten Forums - Windows 10 Help and Support Forum
' Tutorial: Create System Restore Point shortcut in Windows 10


Function GetOS
Set objWMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & ".\root\cimv2")
Set colOS = objWMI.ExecQuery("Select * from Win32_OperatingSystem")
For Each objOS in colOS
If instr(objOS.Caption, "Windows 11") Then
GetOS = "Windows 11"
End If
Next
End Function

If GetOS = "Windows 11" Then
If WScript.Arguments.length =0 Then
Set objShell = CreateObject("Shell.Application")
objShell.ShellExecute "wscript.exe", Chr(34) & WScript.ScriptFullName & Chr(34) & " Run", , "runas", 1
Else
const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set oReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion\SystemRestore"
strValueName = "SystemRestorePointCreationFrequency"
oReg.SetDWORDValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,0
CreateSRP
End If
End If


Sub CreateSRP

GetObject("winmgmts:\\.\root\default:Systemrestore").CreateRestorePoint "Instant Restore Point", 0, 100

End Sub


Good Luck Mate!
TM :cool:
 

My Computer My Computer

At a glance

Windows 11 Home x64 Version 25H2 Build 26200....
OS
Windows 11 Home x64 Version 25H2 Build 26200.8037

Latest Support Threads

Back
Top Bottom