code:

$gateway=enumipinfo(0,3)
select
	case $gateway=" 10. 0. 0. 1"
		shell "\\nt1\netlogon\perkins.bat"
	case $gateway=" 10. 0. 2. 1"
		shell "\\gonzales\netlogon\gonzales.bat"
	case 1
		? "can't figure out where I am. Quitting"
		quit
	endselect
_________________________
How to ask questions the smart way <-----------> Before you ask