Public oNICs oNetwork = CreateObject("WScript.Network") cHostName = oNetwork.ComputerName oNICs = GetObject( "winmgmts:{impersonationLevel=impersonate}!\\" + cHostName + "\root\cimv2").ExecQuery("Select * from Win32_NetworkAdapter" ) For each oID in oNICs IndexNo = oID.Index ? IndexNo NextThanks.