您好,登錄后才能下訂單哦!
vbs中怎么實(shí)現(xiàn)枚舉網(wǎng)絡(luò)連接,相信很多沒(méi)有經(jīng)驗(yàn)的人對(duì)此束手無(wú)策,為此本文總結(jié)了問(wèn)題出現(xiàn)的原因和解決方法,通過(guò)這篇文章希望你能解決這個(gè)問(wèn)題。
代碼如下:
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_NetworkConnection") For Each objItem in colItems Wscript.Echo "Access Mask: " & objItem.AccessMask Wscript.Echo "Caption: " & objItem.Caption Wscript.Echo "Connection State: " & objItem.ConnectionState Wscript.Echo "Connection Type: " & objItem.ConnectionType Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Display Type: " & objItem.DisplayType Wscript.Echo "Local Name: " & objItem.LocalName Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Persistent: " & objItem.Persistent Wscript.Echo "Provider Name: " & objItem.ProviderName Wscript.Echo "Remote Name: " & objItem.RemoteName Wscript.Echo "Remote Path: " & objItem.RemotePath Wscript.Echo "Resource Type: " & objItem.ResourceType Wscript.Echo "User Name: " & objItem.UserName Wscript.Echo Next
看完上述內(nèi)容,你們掌握vbs中怎么實(shí)現(xiàn)枚舉網(wǎng)絡(luò)連接的方法了嗎?如果還想學(xué)到更多技能或想了解更多相關(guān)內(nèi)容,歡迎關(guān)注億速云行業(yè)資訊頻道,感謝各位的閱讀!
免責(zé)聲明:本站發(fā)布的內(nèi)容(圖片、視頻和文字)以原創(chuàng)、轉(zhuǎn)載和分享為主,文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如果涉及侵權(quán)請(qǐng)聯(lián)系站長(zhǎng)郵箱:is@yisu.com進(jìn)行舉報(bào),并提供相關(guān)證據(jù),一經(jīng)查實(shí),將立刻刪除涉嫌侵權(quán)內(nèi)容。