用vbs实现注册表开关的脚本
2008-06-04 08:43
639 查看
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="注册表开关"
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
相关文章推荐
- 用vbs实现解除注册表CMD、Regedit、Taskmgr限制的脚本代码
- 利用计划任务和VBS脚本实现自动WEB共享文件夹里的文件
- VBS 通过注册表修改ie的安全级别,允许本地文件的脚本运行
- vbs 注册表实现木马自启动
- VBS自编写脚本。(实现批量修改文件名且在执行前,备份原有文件夹中的文件)
- 利用VBS脚本监控CPU,实现邮件报警
- 用vbs实现的瞬间关闭多个系统进程的脚本
- vbs脚本实现下载jre包并静默安装的代码实例
- 多进程的实现投票的vbs脚本
- 用vbs实现自动检查代理是否可用,并自动设置IE代理的脚本
- 用VBS实现脚本结束进程与防止进程启动
- 用vbs实现本地连接禁用/启用脚本代码
- 用vbs实现修改dns的网关脚本
- VBS脚本完美实现开机延时启动
- vbs脚本实现window环境下的mysql数据库的备份及删除早期备份
- 用JavaScript和注册表脚本实现右键收藏Web页选中文本
- 通过vbs脚本实现批处理后台运行
- 用vbs实现获取电脑硬件信息的脚本_最新版第1/4页
- 用vbs实现的exe2swf工具脚本代码
- Windows系统使用vbs脚本或bat脚本强制杀死指定所有进程 vbs实现循环持续写入内容到vbs打开开的记事本 使用vbs、bat添加windows计划任务 使用cmd schtasks命令添加windows计划任务