- Set oReg = CreateObject("Wscript.Shell")
- RegPath = "HKCU\Software\Microsoft\Windows\CurrentVersion\Internet Settings\"
- oReg.RegWrite RegPath & "ProxyEnable","1","REG_DWORD"
- oReg.RegWrite RegPath & "ProxyServer","10.22.0.29:8088","REG_SZ"
- oReg.RegWrite RegPath & "ProxyOverride","10.*;11.*","REG_SZ"
- msgbox "修改注册表完成"
复制代码
|