VBScript Bestimmtes Oktett der eigenen IP Adresse in Variable speichern
Guten Tag liebe Community!
Dies hier ist mein erster Beitrag/Frage. :P
Also:
Ich möchte mittels VBScript das dritte Oktett der IP Adresse meines aktiven LAN-Adapters in eine Variable zwischenspeichern.
Mehr brauche ich nicht. :D
Sicher legt ihr den Usern nahe, selbst, bzw. nur durch kleinere Hilfen ans Ziel zu kommen, aber in diesem Fall wäre ich euch wirklich dankbar, wenn ihr einfach den Code posten könntet, weil hier bin ich leider schon mit meinen Programmierkenntnissen am Limit :D
Vielen Dank schonmal im Vorraus !
YANNOSCH !
Dies hier ist mein erster Beitrag/Frage. :P
Also:
Ich möchte mittels VBScript das dritte Oktett der IP Adresse meines aktiven LAN-Adapters in eine Variable zwischenspeichern.
Mehr brauche ich nicht. :D
Sicher legt ihr den Usern nahe, selbst, bzw. nur durch kleinere Hilfen ans Ziel zu kommen, aber in diesem Fall wäre ich euch wirklich dankbar, wenn ihr einfach den Code posten könntet, weil hier bin ich leider schon mit meinen Programmierkenntnissen am Limit :D
Vielen Dank schonmal im Vorraus !
YANNOSCH !
Please also mark the comments that contributed to the solution of the article
Content-Key: 197133
Url: https://administrator.de/contentid/197133
Printed on: April 25, 2024 at 16:04 o'clock
2 Comments
Latest comment
Hallo Yannosch!
In etwa so:
Gruß Dieter
In etwa so:
Dim oNetAdp, sIP3
For Each oNetAdp In GetObject("winmgmts:!\\.\root\cimv2") _
.ExecQuery("Select * from Win32_NetworkAdapterConfiguration Where IPEnabled=True")
sIP3 = Split(oNetAdp.IPAddress(0), ".")(2)
Next
If sIP3 = Empty Then MsgBox "nix aktiv" Else MsgBox sIP3
Gruß Dieter