2010-05-25 43 views
0

如何使用VBScript查找我的電腦的IP地址?使用VBScript查找我的電腦的IP地址

+1

一種計算機* *可以(且通常具有* *)在**同一時間有多個IP地址**。你想要哪一個 ?如果你的意思是「互聯網」IP地址,那是一個完全不同的問題。 – ereOn 2010-05-25 11:55:04

+0

局域網中的opther計算機可以ping通它的ip地址 – aks 2010-05-25 11:57:20

回答

0

該實施例表明配置的IP和計算機名:

dim NIC1, Nic, StrIP, CompName 

Set NIC1 =  GetObject("winmgmts:").InstancesOf("Win32_NetworkAdapterConfiguration") 

For Each Nic in NIC1 

    if Nic.IPEnabled then 
     StrIP = Nic.IPAddress(i) 

     Set WshNetwork = WScript.CreateObject("WScript.Network") 
     CompName= WshNetwork.Computername 

     MsgBox "IP Address: "&StrIP & vbNewLine _ 
      & "Computer Name: "&CompName,4160,"IP Address and Computer Name" 

     wscript.quit 
    End if 
Next