用vbs實(shí)現(xiàn)枚舉網(wǎng)絡(luò)連接的代碼
描述
檢索有關(guān)計(jì)算機(jī)上所有活動(dòng)網(wǎng)絡(luò)連接的信息。
有關(guān)在這段代碼中使用的 Win32_NetworkConnection 類別的更多信息,請(qǐng)單擊 此處。
支持平臺(tái)
Windows Server 2003 |
是 |
Windows XP |
是 |
Windows 2000 |
是 |
Windows NT 4.0 |
Yes, with WMI installed |
腳本代碼
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
相關(guān)文章
VBS中InStrRev函數(shù)的第三個(gè)參數(shù)(Start)使用注意事項(xiàng)
這篇文章主要介紹了VBS中InStrRev函數(shù)的第三個(gè)參數(shù)(Start)使用注意事項(xiàng),它是從開始第N個(gè)字符開始搜索的,需要的朋友可以參考下2014-07-07利用vbs寫的延時(shí)關(guān)閉ie進(jìn)程的腳本代碼
windows 利用vbs 寫的延時(shí)關(guān)閉ie進(jìn)程的腳本,需要的朋友可以參考下。2010-11-11vbscript腳本編程教程2利用fso來進(jìn)行文件操作
vbscript腳本編程教程2利用fso來進(jìn)行文件操作...2007-03-03用VBS實(shí)現(xiàn)的發(fā)送帶Cookie的HTTP請(qǐng)求的代碼
在昨天的《使用正確版本的XMLHTTP》中賣了個(gè)關(guān)子,ServerXMLHTTP的功能比XMLHTTP強(qiáng)大,你現(xiàn)在大概已經(jīng)猜到了吧。沒錯(cuò),用ServerXMLHTTP可以在HTTP請(qǐng)求頭中加入Cookie,而XMLHTTP不可以2013-01-01WMI中的Win32_PingStatus類(ping命令實(shí)現(xiàn))
平時(shí)很少用到ping命令,所以這個(gè)類也沒怎么用過,測(cè)試了一下,好像效率比ping要高。計(jì)算ping 100次jb51.net延遲的平均值。2011-01-01