AD脚本kixtart运用之二(客户端IE代理设置)-创新互联

根据前一编文章http://windyma.blog.51cto.com/661702/1967027 用户脚本基础上

创新互联长期为近千家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为新郑企业提供专业的成都网站制作、网站建设,新郑网站改版等技术服务。拥有10余年丰富建站经验和众多成功案例,为您定制开发。

在脚本文件kixtart.kix里添加如下内容:

;先获取客户端IP地址
$SUBNET = Ltrim(SubStr(@IPADDRESS0, 1, 8))
$TEMP = @IPADDRESS0
$IP=""
FOR $Counter=1 TO 15
  IF SUBSTR($TEMP,$Counter,1) = " "
    $IP=$IP + "0"
  ELSE
    $IP=$IP + SUBSTR($TEMP,$Counter,1)
  ENDIF
NEXT
$Network=SUBSTR($IP,1,11)
;根据不同IP段是否启用IE代理,如下为70,71,73三段IP不启用,其它启用IE代理
SELECT
Case $Network = "192.168.070"
WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyEnable", "0", "Reg_DWORD")
GOTO ENDIESETTING
Case $Network = "192.168.071"
WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyEnable", "0", "Reg_DWORD")
GOTO ENDIESETTING
Case $Network = "192.168.073"
WRITEVALUE("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyEnable", "0", "Reg_DWORD")
GOTO ENDIESETTING
ENDSELECT
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyEnable", "1", "Reg_DWORD")
:ENDIESETTING
;设置IE代理服务器地址,同时根据不同用户组,使用不同的代理服务器
IF INGROUP ("Proxy-100")
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyServer", "192.168.38.100:8080", "Reg_SZ")
ELSE
WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\Currentversion\Internet Settings", "ProxyServer", "192.168.38.111:8080", "Reg_SZ")
ENDIF

另外有需要云服务器可以了解下创新互联scvps.cn,海内外云服务器15元起步,三天无理由+7*72小时售后在线,公司持有idc许可证,提供“云服务器、裸金属服务器、高防服务器、香港服务器、美国服务器、虚拟主机、免备案服务器”等云主机租用服务以及企业上云的综合解决方案,具有“安全稳定、简单易用、服务可用性高、性价比高”等特点与优势,专为企业上云打造定制,能够满足用户丰富、多元化的应用场景需求。


分享题目:AD脚本kixtart运用之二(客户端IE代理设置)-创新互联
网页URL:http://scyanting.com/article/dcdcps.html