用vbs實現(xiàn)注冊表開關(guān)的腳本
更新時間:2008年06月04日 08:43:29 作者:
注冊表開關(guān)[以下代碼保存為.vbs]
Dim WSHShell,r,M,v,t,g,i
On Error Resume Next
Set WSHShell=WScript.CreateObject("WScript.Shell")
v="HKCU\Software\Microsoft\Windows\CurrentVersion\
Policies\System\DisableRegistryTools"
i="REG_DWORD"
t="注冊表開關(guān)"
r=WSHShell.RegRead(v)
g=1
If (r=1) Then g=0
If g=1 Then
WSHShell.RegWrite v,1,i
M=MsgBox("是否限制注冊表編輯器?",4,t)
Else
WSHShell.RegDelete v
M=MsgBox("是否解除注冊表編輯器限制?",4,t)
End If
相關(guān)文章
VBS 硬盤讀寫統(tǒng)計(分區(qū)讀寫統(tǒng)計)
用vbs實現(xiàn)的硬盤讀寫統(tǒng)計(分區(qū)讀寫統(tǒng)計)的實現(xiàn)代碼,想學習vbs的朋友可以參考下2013-01-01
bookfind 通過ISBN序號獲取圖書連接的書名與作者的vbs代碼
bookfind 通過ISBN序號獲取圖書連接的書名與作者的vbs代碼,類似小偷程序,通過正則匹配,雖然現(xiàn)在已經(jīng)無法使用,但代碼不錯,原理都有2011-12-12
VBS教程:函數(shù)-ScriptEngineMinorVersion 函數(shù)
VBS教程:函數(shù)-ScriptEngineMinorVersion 函數(shù)...2006-11-11

