用vbs得到計(jì)算機(jī)的 IP 地址
更新時(shí)間：2007年05月14日 00:00:00 作者：
描述
返回安裝在計(jì)算機(jī)中的每個(gè)支持 IP 的網(wǎng)絡(luò)適配器的 IP 地址。
腳本代碼
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set IPConfigSet = objWMIService.ExecQuery _
("Select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For i=LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
WScript.Echo IPConfig.IPAddress(i)
Next
End If
Next
返回安裝在計(jì)算機(jī)中的每個(gè)支持 IP 的網(wǎng)絡(luò)適配器的 IP 地址。
腳本代碼
復(fù)制代碼 代碼如下:
strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
Set IPConfigSet = objWMIService.ExecQuery _
("Select IPAddress from Win32_NetworkAdapterConfiguration where IPEnabled=TRUE")
For Each IPConfig in IPConfigSet
If Not IsNull(IPConfig.IPAddress) Then
For i=LBound(IPConfig.IPAddress) to UBound(IPConfig.IPAddress)
WScript.Echo IPConfig.IPAddress(i)
Next
End If
Next
相關(guān)文章
vbs實(shí)現(xiàn)的保存剪貼板中的文本并編輯或保存
這篇文章主要介紹了通過vbs實(shí)現(xiàn)的保存剪貼板中的文本實(shí)現(xiàn)編輯或保存的實(shí)現(xiàn)方法，需要的朋友可以參考下2014-05-05
Me 關(guān)鍵字代表著類在代碼運(yùn)行時(shí)的當(dāng)前實(shí)例（instance），或者說，當(dāng)前對象（object）。2011-10-10
VBS教程：方法-FileExists 方法...2006-11-11
什么是 WSH(腳本宿主)的詳細(xì)解釋...2007-02-02
vbs中通過intpu傳值進(jìn)行運(yùn)算的方法，需要的朋友可以參考下。2011-03-03![[導(dǎo)入][原創(chuàng)]用腳本控制迅雷下載](http://img.jbzj.com/images/xgimg/bcimg5.png)
[導(dǎo)入][原創(chuàng)]用腳本控制迅雷下載
[導(dǎo)入][原創(chuàng)]用腳本控制迅雷下載...2007-03-03
下面的vbs類雖然簡單，但也看出來，vbs類的原理，大家可以根據(jù)自己的需要編寫2008-05-05
VBS教程：函數(shù)-派生數(shù)學(xué)函數(shù)
VBS教程：函數(shù)-派生數(shù)學(xué)函數(shù)...2006-11-11
這篇文章主要介紹了vbs ping實(shí)現(xiàn)的兩種方式，文中通過示例代碼介紹的非常詳細(xì)，對大家的學(xué)習(xí)或者工作具有一定的參考學(xué)習(xí)價(jià)值，需要的朋友們下面隨著小編來一起學(xué)習(xí)學(xué)習(xí)吧2020-03-03
用vbscript實(shí)現(xiàn)系統(tǒng)的重啟，其實(shí)就是用vbscript執(zhí)行系統(tǒng)下的shutdown.exe實(shí)現(xiàn)，汗2008-06-06