Social Icons

twitterfacebookgoogle pluslinkedinrss feedemail

Mengaktifkan kembali regedit yang tidak bisa dibuka



Hai Sobat Blogger ! nah pada kesempatan kali ini media on7 akan membahas tentang cara mengaktifkan kembali Regedit kepanjangan dari Registry Editor ini yang hilang atau telah dihilangkan oleh administrator , jika seseorang ingin mengedit Registrynya maka ketika dibuka akan muncul seperti gambar diatas, mungkin kebanyakan orang mengalami masalah seperti gambar diatas,tentunya orang itu sudah bisa memahami regedit dan bersiap untuk menanggung segala resiko jika terjadi kesalahan yang akan dilakukan,Regedit adalah kunci dari seluruh kinerja komputer, data file dari software dan hardware, so jangan sampai ada kekeliruan dalam menghapus/mengeditnya sembarangan, itu bisa membahayakan komputer kita sendiri
Oke sobat jika ingin mengaktifkan fungsi dari regedit itu sendiri dan ingin mengaktifkannya kembali, media on7 punya beberapa cara nih

Cara ini berlaku jika software diatas tidak bekerja dengan semestinya terpaksa kita harus memperbaikinya secara manual
1.)  Buka notepad sobat , Start > Program > Accesories > Notepad
2.)  Copykan kode berikut di notepad sobat

Kode
'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

3.) Lalu Save As kode tadi dengan nama Registry.vbs dan pilih All File di bagian format filenya , lalu klik Ok 4.)jika sudah buka kembali lalu reboot komputer sobat, lihat hasilnya

Artikel Terkait

Link Partner

Rizaldi Priantama Blog Banner
Pensil Pintar Blog Banner Si Fadly