VBS脚本应用-取本机硬件信息(2) for each item in video video2= video2&"显卡: " & item.Description next '网卡 Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkAdapter",,48) For Each objItem in colItems if (left(objItem.NetConnectionID,4)="本地连接") then lanname=lanname&objItem.Name end if Next lan2="网卡: " & lanname