减小字体
增大字体- ·上一篇文章：用VBS修复任务栏
- ·下一篇文章：VBS 不用Wscript.shell对象启动程序
- ·百度中搜索更多的关于“修改ACCESS宏安全为低的VBS脚本”相关内容
- ·谷歌中搜索更多的关于“修改ACCESS宏安全为低的VBS脚本”相关内容
- ******申明******
- 本站文章内容有部分为收录网络中其他网友内容，DOS资源站不保证所有的代码都适合你使用。
- 由于编辑匆忙，有可能造成某些脚本文件出现丢失代码或代码无法运行的情况，请网友根据情况自行修改。
- 如果能将出错部分反馈给我，那就更好了。
修改ACCESS宏安全为低的VBS脚本
On Error Resume Next
Dim OperationRegistry
Set OperationRegistry=WScript.CreateObject("WScript.Shell")
Set wmiColl = GetObject("WinMgmts:root/cimv2").ExecQuery("Select * FROM Win32_UserAccount")
For Each wmiObj In wmiColl
'wScript.Echo wmiObj.sid
OperationRegistry.RegWrite "HKEY_USERS\"&wmiObj.sid&"\Software\Microsoft\Office\11.0\Access\Security\Level",1,"REG_DWORD"
Next
