Using VBS to get the IP address of the computer _vbs

Describe
Returns the IP address of each IP-enabled network adapter installed in the computer.
Scripting code

Copy Code code as follows:

StrComputer = "."
Set objWMIService = GetObject ("winmgmts:\\" & StrComputer & "\root\cimv2")
Set Ipconfigset = objWMIService.ExecQuery _
("Select IPAddress from Win32_NetworkAdapterConfiguration where Ipenabled=true")
For each IPConfig in Ipconfigset
If not IsNull (ipconfig.ipaddress) Then
For I=lbound (ipconfig.ipaddress) to UBound (ipconfig.ipaddress)
WScript.Echo Ipconfig.ipaddress (i)
Next
End If
Next