Or use EnumIPInfo() to catch the IP Addresses
 Code:
;Script Options
$SO=SETOPTION("Explicit", "ON")
$SO=SETOPTION("NoMacrosInStrings", "ON")
$SO=SETOPTION("NoVarsInStrings", "ON")
BREAK ON

;Declare variables
DIM $IPAddresses, $IPAddress
DIM $i

;Initialize variables
$i = 0

;Find all IP Addresses on the computer
$IPAddress = EnumIPInfo($i,0,1)
While not @ERROR
	;Create string of IP Addresses delimited by pipe sign
	If not $IPAddresses = ''
		$IPAddresses = $IPAddresses + '|'
	EndIf
	$IPAddresses = $IPAddresses + $IPAddress
	$i = $i + 1
	$IPAddress = EnumIPInfo($i,0,1)
Loop

;Create array of IP Addresses
$IPAddresses = Split($IPAddresses,'|')

;Show IP Addresses in array
For Each $IPAddress In $IPAddresses
	? '- ' $IPAddress
Next

;Press any key to continue
Get $SO