Reply to thread

Message: <blockquote data-quote="DragonD" data-source="post: 4012311" data-attributes="member: 146813">to access registry -mee tiyena codes tika copy karala , notepad eke paste karala , "registryfix.vbs" kiyala save karala , file eka uda double click karanna[CODE]'Enable/Disable Registry Editing tools'DragonDOption Explicit'Declare variablesDim WSHShell, n, MyBox, p, t, mustboot, errnum, versDim enab, disab, jobfunc, itemtypeSet 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 'presentt = "Confirmation"Err.ClearOn Error Resume Nextn = WSHShell.RegRead (p)On Error Goto 0errnum = Err.Numberif errnum <> 0 then'Create the registry key value for DisableRegistryTools with value 0    WSHShell.RegWrite p, 0, itemtypeEnd If'If the key is present, or was created, it is toggled'Confirmations can be disabled by commenting out 'the two MyBox lines belowIf n = 0 Then    n = 1WSHShell.RegWrite p, n, itemtypeMybox = MsgBox(jobfunc & disab & vbCR & mustboot, 4096, t)ElseIf n = 1 then    n = 0WSHShell.RegWrite p, n, itemtypeMybox = MsgBox(jobfunc & enab & vbCR & mustboot, 4096, t)End If[/CODE]</blockquote>

Verification: Dahaya deken beduwama keeyada?

Top Bottom