![]() |
|
Tipp 0181
|
Lokale IP-Adresse ermitteln (WMI)
|
 |
|
Autor/Einsender:
Datum: |
|
Sebastian Gross
30.06.2008 |
|
| Entwicklungsumgebung: |
|
VB.Net 2005 |
| Framework: |
|
2.0 |
|
|
|
Die lokale IP-Adresse ist die Adresse jedes einzelnen Computers im
Netzwerk, und kann sowohl über Dns.GetHostEntry (System.Net.Dns.GetHostEntry(System.Net.Dns.GetHostName()).AddressList)
als auch über WMI ermittelt werden.
|
|
Hier ist die WMI-Variante. In .NET gibt es dafür den Namespace
System.Management. Wichtig ist, dass zunächst ein Net-Verweis auf System.Management gesetzt wird,
und zwar im Projektmappen-Explorer über das Kontextmenü "Verweis hinzufügen".
|
|
| |
Function ShowIP() As String
Dim query As ManagementObjectSearcher = _
New ManagementObjectSearcher("SELECT * FROM " & _
"Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
Dim queryCollection As ManagementObjectCollection = query.Get()
Dim mo As ManagementObject
Dim IPAdress(1) As String
For Each mo In queryCollection
IPAdress = CType(mo.GetPropertyValue("IPAddress"), String())
Next
ShowIP = IPAdress(0)
End Function |
|
|
|
|
|
|
| Windows-Version |
| 98/SE |
 |
|
| ME |
|
|
| NT |
|
|
| 2000 |
|
|
| XP |
|
|
| Vista |
|
|
| Win
7 |
|
|
|
|
Download (13,4
kB)
|
Downloads bisher: [ 448 ]
|
|
|
Vorheriger Tipp
Zum Seitenanfang 