Vista - Enumerate all network connections

Hi,

If I rightclick on XP's Network Neighborhood and select Properties I get
a new window with all the computer's network connections displayed.

How can I enumerate these connections in a list and check whether each
is active / deactivated and connected / disconnected?

Thanks a lot for examples on how to do that

regards

jake

"Jake" <jake56@xxxxxx> wrote in message
news:uAxBwtN1JHA.6056@xxxxxxIt isn't VB Script but it's exceedingly simple:

net.exe use

Pegasus [MVP] wrote:Pegasus,

Thanks but when I did that I got a list of all the drive mappings, not
all the network *adapters* as displayed under Network
Neigborhood/Properties.

No other 'net' parameter seemed to give me that either.

Any other clues?

regards jake

On May 15, 2:09*am, Jake <jak...@xxxxxx> wrote:Again, at the command prompt, try ...

ipconfig /all

Or in script (from the MS TechNet Script Center's samples) ...

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root
\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from
Win32_NetworkAdapter",,48)
For Each objItem in colItems
Wscript.Echo "Adapter Type: " & objItem.AdapterType

Select Case objItem.AdapterTypeID
Case 0 strAdapterType = "Ethernet 802.3"
Case 1 strAdapterType = "Token Ring 802.5"
Case 2 strAdapterType = "Fiber Distributed Data Interface
(FDDI)"
Case 3 strAdapterType = "Wide Area Network (WAN)"
Case 4 strAdapterType = "LocalTalk"
Case 5 strAdapterType = "Ethernet using DIX header format"
Case 6 strAdapterType = "ARCNET"
Case 7 strAdapterType = "ARCNET (878.2)"
Case 8 strAdapterType = "ATM"
Case 9 strAdapterType = "Wireless"
Case 10 strAdapterType = "Infrared Wireless"
Case 11 strAdapterType = "Bpc"
Case 12 strAdapterType = "CoWan"
Case 13 strAdapterType = "1394"
End Select

Wscript.Echo "Adapter Type Id: " & strAdapterType
Wscript.Echo "AutoSense: " & objItem.AutoSense
Wscript.Echo "Description: " & objItem.Description
Wscript.Echo "Device ID: " & objItem.DeviceID
Wscript.Echo "Index: " & objItem.Index
Wscript.Echo "MAC Address: " & objItem.MACAddress
Wscript.Echo "Manufacturer: " & objItem.Manufacturer
Wscript.Echo "Maximum Number Controlled: " &
objItem.MaxNumberControlled
Wscript.Echo "Maximum Speed: " & objItem.MaxSpeed
Wscript.Echo "Name: " & objItem.Name
Wscript.Echo "Net Connection ID: " & objItem.NetConnectionID
Wscript.Echo "Net Connection Status: " &
objItem.NetConnectionStatus
For Each strNetworkAddress in objItem.NetworkAddresses
Wscript.Echo "NetworkAddress: " & strNetworkAddress
Next
Wscript.Echo "Permanent Address: " & objItem.PermanentAddress
Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID
Wscript.Echo "Product Name: " & objItem.ProductName
Wscript.Echo "Service Name: " & objItem.ServiceName
Wscript.Echo "Speed: " & objItem.Speed
Next

Tom Lavedas
***********
http://there.is.no.more/tglbatch/