Search
Search titles only
By:
Search titles only
By:
Log in
Register
Search
Search titles only
By:
Search titles only
By:
Menu
Install the app
Install
Forums
New posts
All threads
Latest threads
New posts
Trending threads
Trending
Search forums
What's new
New posts
New ads
New profile posts
Latest activity
Free Ads
Latest reviews
Search ads
Members
Current visitors
New profile posts
Search profile posts
Contact us
Latest ads
Ad icon
Video Content Creator
pramukag
Updated:
Today at 6:10 AM
Ad icon
QA Engineer Intern
pramukag
Updated:
Today at 6:07 AM
Ad icon
Sell your Land, House on idamata.lk for FREE
sajith.xp.pk
Updated:
Thursday at 9:03 AM
Handmade Character Soft Toys
anil1961
Updated:
Tuesday at 2:11 PM
Bodim.lk out now !
Manoj Suranga Bandara
Updated:
Jun 21, 2026
Electronics
Vehicles
Property
Search
Reply to thread
Forums
General
ElaKiri Talk!
How to add an Image to your folder background
Get the App
JavaScript is disabled. For a better experience, please enable JavaScript in your browser before proceeding.
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an
alternative browser
.
Message
<blockquote data-quote="x-pert" data-source="post: 657986" data-attributes="member: 837"><p>Heshan >> </p><p></p><p>Copy the following code,paste in any notepad and save as "regtools.vbs" file. Just double click it and you will get yor regedit enabled.(Be careful to copy the code exactly as presented here including everything.)</p><p></p><p></p><p></p><p>'Enable/Disable Registry Editing tools</p><p>'© Doug Knox - rev 12/06/99</p><p>Option Explicit</p><p>'Declare variables</p><p>Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers</p><p>Dim enab, disab, jobfunc, itemtype</p><p>Set WSHShell = WScript.CreateObject("WScript.Shell")</p><p>p = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\"</p><p>p = p & "DisableRegistryTools"</p><p>itemtype = "REG_DWORD"</p><p>mustboot = "Log off and back on, or restart your pc to" & vbCR & "effect the changes"</p><p>enab = "ENABLED"</p><p>disab = "DISABLED"</p><p>jobfunc = "Registry Editing Tools are now "</p><p>'This section tries to read the registry key value. If not present an </p><p>'error is generated. Normal error return should be 0 if value is </p><p>'present</p><p>t = "Confirmation"</p><p>Err.Clear</p><p>On Error Resume Next</p><p>n = WSHShell.RegRead (p)</p><p>On Error Goto 0</p><p>errnum = Err.Number</p><p>if errnum <> 0 then</p><p>'Create the registry key value for DisableRegistryTools with value 0</p><p> WSHShell.RegWrite p, 0, itemtype</p><p>End If</p><p>'If the key is present, or was created, it is toggled</p><p>'Confirmations can be disabled by commenting out </p><p>'the two MyBox lines below</p><p>If n = 0 Then</p><p> n = 1</p><p>WSHShell.RegWrite p, n, itemtype</p><p>Mybox = MsgBox(jobfunc & disab & vbCR & mustboot, 4096, t)</p><p>ElseIf n = 1 then</p><p> n = 0</p><p>WSHShell.RegWrite p, n, itemtype</p><p>Mybox = MsgBox(jobfunc & enab & vbCR & mustboot, 4096, t)</p><p>End If</p><p>_________________________________________________________________________________</p><p></p><p>And to enable folder options copy following code,paste it in any notepad and asve as "folderoptions.reg" file.Double click it and your folder options will be restored</p><p></p><p>_________________________________________________________________________________</p><p></p><p></p><p>Windows Registry Editor Version 5.00</p><p>[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer]</p><p>"NoFolderOptions"=dword:0000000</p><p>[HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions]</p><p>"NoBrowserOptions"=dword:00000000</p><p></p><p>__________________________________________________________________________________</p></blockquote><p></p>
[QUOTE="x-pert, post: 657986, member: 837"] Heshan >> Copy the following code,paste in any notepad and save as "regtools.vbs" file. Just double click it and you will get yor regedit enabled.(Be careful to copy the code exactly as presented here including everything.) '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 _________________________________________________________________________________ And to enable folder options copy following code,paste it in any notepad and asve as "folderoptions.reg" file.Double click it and your folder options will be restored _________________________________________________________________________________ Windows Registry Editor Version 5.00 [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer] "NoFolderOptions"=dword:0000000 [HKEY_CURRENT_USER\Software\Policies\Microsoft\Internet Explorer\Restrictions] "NoBrowserOptions"=dword:00000000 __________________________________________________________________________________ [/QUOTE]
Insert quotes…
Verification
Hathara warak wissa keeyada? (Hathara wadi karanna 20)
Post reply
Top
Bottom