by BrijMohan.K (3 Submissions)
Category: Registry
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Mon 3rd December 2001
Date Added: Mon 8th February 2021
Rating: (1 Votes)
Enable/Disable Regedit With 8 lines Of Code(NO API Calls) (Restrict Registry Editing)
Add the following Code lines
Dim b As Object
Dim s As String
Private Sub Form_Load()
Command1.Caption = "Disable RegEdit"
Command2.Caption = "Enable RegEdit"
End Sub
Private Sub Command1_Click()
Set b = CreateObject("wscript.shell")
s= "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools"
b.regwrite s, 1, "REG_DWORD"
End Sub
Private Sub Command2_Click()
Set b = CreateObject("wscript.shell")
s= "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools"
b.regdelete s
End Sub
No comments have been posted about Enable/Disable Regedit With 8 lines Of Code(NO API Calls) (Restrict Registry Editing). Why not be the first to post a comment about Enable/Disable Regedit With 8 lines Of Code(NO API Calls) (Restrict Registry Editing).