用vbs實(shí)現(xiàn)注冊(cè)表開(kāi)關(guān)的腳本
更新時(shí)間:2008年06月04日 08:43:29 作者:
注冊(cè)表開(kāi)關(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="注冊(cè)表開(kāi)關(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("是否限制注冊(cè)表編輯器?",4,t)
Else
WSHShell.RegDelete v
M=MsgBox("是否解除注冊(cè)表編輯器限制?",4,t)
End If
相關(guān)文章
使用 Iisftp.vbs 列出FTP站點(diǎn)的方法
這篇文章主要介紹了使用 Iisftp.vbs 列出FTP站點(diǎn)的方法,需要的朋友可以參考下2014-07-07
VBS 硬盤(pán)讀寫(xiě)統(tǒng)計(jì)(分區(qū)讀寫(xiě)統(tǒng)計(jì))
用vbs實(shí)現(xiàn)的硬盤(pán)讀寫(xiě)統(tǒng)計(jì)(分區(qū)讀寫(xiě)統(tǒng)計(jì))的實(shí)現(xiàn)代碼,想學(xué)習(xí)vbs的朋友可以參考下2013-01-01
VBS讀取配置文件配置項(xiàng)的實(shí)現(xiàn)代碼
今天寫(xiě)代碼的時(shí)候需要用到vbs獲取文件配置項(xiàng),不用放數(shù)據(jù)庫(kù)里面,要不增刪改查都要做一篇,本身功能就簡(jiǎn)單,這里就為大家分享一下實(shí)現(xiàn)代碼,需要的朋友可以參考下2019-09-09
bookfind 通過(guò)ISBN序號(hào)獲取圖書(shū)連接的書(shū)名與作者的vbs代碼
bookfind 通過(guò)ISBN序號(hào)獲取圖書(shū)連接的書(shū)名與作者的vbs代碼,類(lèi)似小偷程序,通過(guò)正則匹配,雖然現(xiàn)在已經(jīng)無(wú)法使用,但代碼不錯(cuò),原理都有2011-12-12
VBS教程:函數(shù)-ScriptEngineMinorVersion 函數(shù)
VBS教程:函數(shù)-ScriptEngineMinorVersion 函數(shù)...2006-11-11

