Seite 1 von 1
external ip
Verfasst: 31.05.2005, 22:10
von Cat
Hi ihr lieben,
ich würde mir gerne meine externe Ip auf dem desktop zeigen lassen, bloß geht das mit dem activ script so nicht.
Ich habe ein externes modem und mir scheint, als könnte ich das nicht so abfragen, zweite netzwerkkarte ging, also interne ip.
Gibts da vielleicht schon fertige scripte oder eine anleitung zu, wie ich das trotzdem hinbekomme?
lg Cat
[gelöst]
Verfasst: 31.05.2005, 23:09
von Reborn
Mal gaaanz weg von dem Anliegen... kannst jederzeit über
http://www.wieistmeineip.de abfragen
.
Gibt aber genügend andere Progs, die das darstellen können... vielleicht hilft dir diese Info erstmal... versuchs mal mit :google: .
Sonst sind genügend User hier am Start, die dir bestimmt weiterhelfen werden.
Die Lösung deines Problems scheint in Richtung Samurize zu gehen
.
Verfasst: 01.06.2005, 00:03
von Cat
Reborn hat geschrieben:Mal gaaanz weg von dem Anliegen... kannst jederzeit über
http://www.wieistmeineip.de abfragen
.
Gibt aber genügend andere Progs, die das darstellen können... vielleicht hilft dir diese Info erstmal... versuchs mal mit :google: .
Sonst sind genügend User hier am Start, die dir bestimmt weiterhelfen werden.
Die Lösung deines Problems scheint in Richtung Samurize zu gehen
.
darum bin ich ja auch im subforum samurize.
meine ip kann ich ja auch in den netzwerkverbindungen nachsehen.
Also ich würde das gerne als dauerhafte ausgabe auf dem desktop mit samurize bauen, aber irgendwie steh ich wie ochs vorm berg.
lg Cat
Verfasst: 02.06.2005, 19:54
von Cat
Hi,
habs inzwischen.
Zur info, mit nem script zur NIC-Ausgabe brachte mir das Originalscript von Samurize meine ip dann auch auf den desktop.
für den den es interessiert
das script zur Ausgabe der NICs für alle Netzwerkadapter:
Code: Alles auswählen
On Error Resume Next
strComputer = "."
Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colNicConfigs = objWMIService.ExecQuery ("SELECT * FROM Win32_NetworkAdapterConfiguration WHERE IPEnabled = True")
For Each objNicConfig In colNicConfigs
WScript.Echo VbCrLf & "Index: " & objNicConfig.Index & _
VbCrLf & "Descr: " & objNicConfig.Description & _
VbCrLf & "IpAdr: " & objNicConfig.IPAddress(0)
Next
Greetz Cat