Code:

If @LOGONMODE
	Break on
EndIf

Dim $Junk
$Junk = SetOption("NoMacrosInStrings","On")
$Junk = SetOption("NoVarsInStrings","On")

Dim $N°, $IPAddress
$N° = 0
$Junk = Execute("$IPAddress = @IPADDRESS" + $N°)

While $IPAddress

	$Junk = Execute("$IPAddress = @IPADDRESS" + $N°)
	If NOT $IPAddress
		Quit 0
	EndIf

	? $N° ". "$IPAddress

	$N° = $N° + 1
	If $N° > 3
		Quit 0
	EndIf

Loop

I think this also works for NT4
Sorry, the code I posted here before was not usuable

Edited by Witto (2006-04-03 11:29 AM)