Gathering Workstation IP Address

After searching through the registry on WinXP, I could not find an ASCII
reference for IP address. This was such an easy task with WinNT, yet I
guess it's an encoded value now on WinXP. Anyway, I am using the
following code to gather IP addresses:

-----
'Launch IPCONFIG
Set ipExec = WSH.Exec("ipconfig.exe")

'Go to the correct line of returned output from IPCONFIG
for i = 0 to 6
ipExec.StdOut.SkipLine
next

'Now at the right spot, read the entire line
strIPinfo = ipExec.StdOut.ReadLine()

'Gives me the IP address
strIPinfo = Mid(strIPinfo,45)
-----

While the above works for me, I was hoping there was an object similar
to Wscript.Network that already gathers this information. Besides, the
above code splashes a command window on the screen every so briefly. It
would be nice to simplify things and remove the command window kludge.

Joe

--
Tired Tech
.

Relevant Pages