Code:

$nic=0
:nicloop
$mygw=enumipinfo($nic,3) $ip=enumipinfo($nic,0)
select ; determine physical location of computer
Case $mygw="192.168.101.1" $Location="01" $city="Pensacola"
Case $mygw="192.168.102.1" $Location="02" $city="Panama City"
Case $mygw="192.168.103.1" $Location="03" $city="Alachua"
Case $mygw="192.168.113.1" $Location="03" $city="Ocala"
Case $mygw="192.168.104.1" $Location="04" $city="Jacksonville"
...
Case $mygw=$ip $Location="VPN" $city="TLH"
Case @ras $Location="RAS" $city="TLH"
Case 1 $Location="00" $city=""
endselect
if $Location = "00" and val($nic) < 10
$nic=val($nic)+1
goto nicloop
endif

_________________________
How to ask questions the smart way <-----------> Before you ask