|
many thanks, i used this with ReadProfileString to create an Internet Proxy Switch. Along with the front end ASP page, the kix checks for the PC group membership, if PC group is listed in INI file, apply settings on=Internet access off=Internet Denied took me a while but it appears to be working now. thanks for the help.
here's my final code if your interested!
CLS $NSini=("\\inipath\InternetAccess.ini") $domain=("domain") $PC=$grp.name Break On $obj = GetObject("WinNT://" + @domain + "/" + @wksta + "$$") ? @serror For Each $grp in $obj.groups ? $grp.name If ReadProfileString($NSini,"Rooms",$grp.name) If ReadProfileString($NSini,"Rooms",$grp.name)="on" ;Enable Proxy WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyServer","x.x.x.x:80","REG_SZ") WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Start Page", "http://x.x.x.x/", "REG_SZ") CLS Else ;Disable Proxy WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Internet Settings", "ProxyServer","x.x.x.x:80","REG_SZ") WriteValue("HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main", "Start Page", "http://x.x.x.x/", "REG_SZ") CLS EndIf EndIf Next Exit 0
|