完整的注册表操作实例 VBS脚本.doc

①创建主键、创建各类型的键值。 ②读取键值并分析键值类型。 ③枚举主键及键值。 ④判断键或键值是否存在。 ⑤查询注册表键的操作权限。 ⑥监视注册表根键、主键、键值，当发现变动时提示。 复制代码 代码如下: 注册表查询/操作 On Error Resume Next Const HKEY_CLASSES_ROOT = 置注册表5大根键，HKCR-----------① Const HKEY_CURRENT_USER = KCU Const HKEY_LOCAL_MACHINE = KLM Const HKEY_Users = KU Const HKEY_Current_Config = KCC Const REG_SZ = 1设置注册表键值类型，字符串型---------------------------② Const REG_EXPAND_SZ = 2扩展字符串型 Const REG_BINARY = 3二进制型 Const REG_DWORD = 4双字节型 Const REG_MULTI_SZ = 7多字符串型 Const KEY_QUERY_VALUE = H0001查询注册表权限，查询数值-----------------③ Const KEY_SET_VALUE = H0002设置数值 Const KEY_CREATE_SUB_KEY = H0004创建子项 Const DELETE = 除项值 -----------------配置环境(路径)----------------------------------------00 strComputer = . Set WshShell = WScript.CreateObject(WScript.Shell) Set oReg=GetObject(winmgmts:{impersonationLevel=impersonate}!\\ strComputer \root\default:StdRegProv) strKeyRoot = HKEY_LOCAL_MACHINE Regpath = HKEY_LOCAL_MACHINE strKeyPath = Software\Microsoft\Windows\CurrentVersion\Run WshSHell.popup 设置路径【HKLM\Software\Microsoft\Windows\CurrentVersion\Run】成功vbcrlfvbcrlfvbcrlfvbcrlfvbcrlf5 秒钟后本窗口将自动关闭!, 5, QQ 0 + 64 -----------------创建主键REG_KEY_SZ----------------------------------01 strKeyPathNew = Software\Microsoft\Windows\CurrentVersion\Run\User_baomaboy\注意因为是新建主键，要多加个“\” oReg.CreateKey strKeyRoot, strKeyPathNew WshSHell.popup 创建主键【HKLM\Software\Microsoft\Windows\CurrentVersion\Run\User_baomaboy\】成功vbcrlfvbcrlfvbcrlfvbcrlfvbcrlf5 秒钟后本窗口将自动关闭!, 5, QQ 0 + 64 -----------------创建字符串值REG_SZ----------------------------------02 strValueName=1字符串名 strValue=字符串值 oReg.SetStringValue strKeyRoot, strKeyPath, strValueName, strValue WshSHell.popup 创建字符串【HKLM\Software\Microsoft\Windows\CurrentVersion\Run\1字符串名】成功vbcrlfvbcrlfvbcrlfvbcrlfvbcrlf5 秒钟后本窗口将自动关闭!, 5, QQ 0 + 64 -----------------创建双字节值REG_DWORD-------------------------------- strValueName=2双字节名 strValue=1 oReg.SetDWORD