用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)文章
ass2srt.vbs(ass/ssa批量轉(zhuǎn)換srt的腳本)
這篇文章主要介紹了ass2srt.vbs一個(gè)ass/ssa批量轉(zhuǎn)換srt的腳本,需要的朋友可以參考下2014-09-09
Vbs是一種變量無關(guān)、解釋性執(zhí)行的腳本語言,下面這篇文章主要給大家介紹了關(guān)于VBS腳本基礎(chǔ)語法的相關(guān)資料,文中通過實(shí)例代碼介紹的非常詳細(xì),需要的朋友可以參考下2022-04-04
教你用vbs實(shí)現(xiàn)微信自動(dòng)發(fā)送消息功能
無意中接觸了vbs這個(gè)腳本感覺挺好玩的,這篇文章主要給大家介紹了關(guān)于如何用vbs實(shí)現(xiàn)微信自動(dòng)發(fā)送消息功能的相關(guān)資料,文中通過實(shí)例代碼介紹的非常詳細(xì),需要的朋友可以參考下2022-04-04
VBS教程：VBscript語句-On Error 語句...2006-11-11
這篇文章為大家介紹了vbs的writeline方法，就是向 TextStream 文件寫入指定字符串和新行字符2006-11-11
Decode all files encoded (original version) with screnc.exe2013-07-07
防SQL注入的VBSrcipt代碼...2007-03-03
什么是 WSH(腳本宿主)的詳細(xì)解釋...2007-02-02
VBS實(shí)現(xiàn)將當(dāng)前時(shí)間轉(zhuǎn)換成UTC時(shí)間
這篇文章主要介紹了VBS實(shí)現(xiàn)將當(dāng)前時(shí)間轉(zhuǎn)換成UTC時(shí)間,十分的簡(jiǎn)單實(shí)用，需要的朋友可以參考下2015-05-05
這篇文章主要介紹了深入挖掘Windows腳本技術(shù)2006-09-09