Parsi Coders
VB6 - Kill SystemRestore - نسخه قابل چاپ

+- Parsi Coders (http://parsicoders.com)
+-- انجمن: Software Development Programming (http://parsicoders.com/forumdisplay.php?fid=37)
+--- انجمن: Visual Basic Programming (http://parsicoders.com/forumdisplay.php?fid=39)
+---- انجمن: Visual Basic 6 (http://parsicoders.com/forumdisplay.php?fid=44)
+---- موضوع: VB6 - Kill SystemRestore (/showthread.php?tid=1097)



VB6 - Kill SystemRestore - Amin_Mansouri - 10-17-2011

از کار انداختن سیستم ریستوری
کد:
Public Sub KillRestore()
Dim reg
Set reg = CreateObject("WScript.Shell")
reg.RegWrite "HKLM\Software\Microsoft\Windows NT\CurrentVersion\SystemRestore\DisableSR", 1, "REG_DWORD"
End Sub
enjoy