~|~ Registry Enable |~|

[Fahad-G]

'Enable/Disable Registry Editing tools
'© Doug Knox - rev 12/06/99
Option Explicit
'Declare variables
Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers
Dim enab, disab, jobfunc, itemtype
Set WSHShell = WScript.CreateObject("WScript.Shell")
p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"
p = p & "DisableRegistryTools"
itemtype = "REG_DWORD"
mustboot = "Log off and back on, or restart your pc to" & vbCR & "effect the changes"
enab = "ENABLED"
disab = "DISABLED"
jobfunc = "Registry Editing Tools are now "
'This section tries to read the registry key value. If not present an
'error is generated.  Normal error return should be 0 if value is
'present
t = "Confirmation"
Err.Clear
On Error Resume Next
n = WSHShell.RegRead (p)
On Error Goto 0
errnum = Err.Number
if errnum <> 0 then
'Create the registry key value for DisableRegistryTools with value 0
WSHShell.RegWrite p, 0, itemtype
End If
'If the key is present, or was created, it is toggled
'Confirmations can be disabled by commenting out
'the two MyBox lines below
If n = 0 Then
n = 1
WSHShell.RegWrite p, n, itemtype
Mybox = MsgBox(jobfunc & disab & vbCR & mustboot, 4096, t)
ElseIf n = 1 then
n = 0
WSHShell.RegWrite p, n, itemtype
Mybox = MsgBox(jobfunc & enab & vbCR & mustboot, 4096, t)
End If

[zishi_a]

Good sulution.....

[GR8^4^U]

best

[Fahad-G]

ThanX

[Regedit]

Xcelent Sulotion

[mani_jamo]

M.Fahad Bhai lakin aap ne to Farhan Shahzad ko copy kiya hai
Nice Sharing

[Fahad-G]

M.Fahad Bhai lakin aap ne to Farhan Shahzad ko copy kiya hai
Nice Sharing

Who Is Farhan Sehzad???

[shahzad khan08]

IT Dunya say naata jod kar maloom huwa kay hamaray mulk main
zaheen afraad ki kami naheen hay. Bus hosla afzaai ki ashad zaroorat hay.
Mujhay to bohat afsoos ho raha hay kay main nay phelay IT dunya ko join
kiuoon naheen kia.

Allah Hafiz

Aap sab ka duwa go bhai

Shahzad Khan

[Shahroz Awan]

Nice Tip Hai Brother

[Fahad-G]

ThanX

[mani_jamo]

M.Fahad Bhai lakin aap ne to Farhan Shahzad ko copy kiya hai
Nice Sharing

Farhan Shahzad Member of other forum
Registry Tweaker

[mani_jamo]

Thank you Fahad
Nice Sharing Bro keep it up