Như bạn đã biết Registry là một cơ sở dữ liệu phức tạp, nó chứa các thông tin về cấu hình hệ thống và thông tin về các chương trình. Để tránh tình trạng người là sử dụng máy tính của mình để chỉnh sửa Registry, bạn có thể dùng đoạn mã sau để khóa/ mở Registry Editor (trình biên tập Registry).
Option Explicit
Dim WSHShell, n, MyBox, p, t, mustboot, errnum, vers
Dim enab, disab, jobfunc, itemtype
Set WSHShell=WScript.CreateObject(“WScript.Shell”)
p=”HKCUSoftware=MicrosoftWindowsCurrentVersionPoliciesSystem”
p=p&”DisableRegistryTools”
itemtype=”REG_DWORD”
mustboot=”Log off and back on, or restart your pc to”&vbCR&”effect the chages”
enab=”ENABLED”
disab=”DISABLED”
jobfunc=”Registry Editing Tools are now”
t=”Confirmation”
Err.Clear
On Error Resume Next
n=WSHShell.RegRead(p)
On Error Goto 0
errnum=Err.Number
If errnum0 Then
WSHShell.RegWrite p, 0, itemtype
End If
If n=0 Then
n=1
WSHShell.RegWrite p, 0, itemtype
Mybox=MsgBox(jobfunc&disab&vbCR&mustboot, 4096, t)
ElseIf n=1 Then
n=0
WSHShell.RegWrite p, 0, itemtype
Mybox=MsgBox(jobfunc&enab&vbCR&mustboot, 4096, t)
End If
Tags: cách registry editor, cach vao registry editor, chỉnh sửa registry editor, download registry editor, mở registry editor, Registry Editor, tìm hiểu về registry của windows, vài thủ thuật hay với registry