[- gelöst -] Sysinternals BGInfo externe IP

[FrankN]

Hallo,

ich habe für BGInfo einige VB Scripte geschrieben, die die wichtigsten PC Daten (HDD, LAN, System) auslesen und auf den Bildschirm bringen. Was mir jetzt noch fehlt ist die externe IP des Router. Theoretisch könnte ich meine dyndns Adresse auslesen, dafür fehlt mir aber grade der nötige Befehl. Weiß zufällig jemand, wie ich die externe IP erfahren kann oder notfalls den DNS Hostnamen auf die entsprechende IP aufgelöst bekomme?

Gruß Frank

 

[betzi]

Meinst du mit externe IP des Routers also deine WAN IP (du hängst also hinterm Router?) - wenn ja, dann einfach via socket http://www.wieistmeineip.de/ auslesen und nach diesem Tag forsten: <h1 class="ip"> HIER STEHT DEINE WAN IP </h1>

Grüße bätz

 

[silberfieber]

nslookup dyndnsname.domain.bla

 

[McSchipp]

Externe Router IP

http://www.snapfiles.com/dlnow/rdir.dll?id=108934



Beschreibung :

Dieses Tool liest die vom Provider zugewiesene IP-Adresse am WAN-Interface aus der Router-Konfiguration aus. Dazu gibt man die Router-Konfigseite, wo die IP angezeigt wird, und Zugangsdaten an. Dann lässt man den Quellcode auslesen, sucht die Stelle mit der IP, markiert sie und speichert dies ab. Nun kann man die IP manuell oder automatisch periodisch auslesen lassen und vom Programm per E-Mail oder FTP von außerhalb zugänglich machen



"Zitat aus Fachinformatiker.de" - die Seite hatte ich noch in der Fav-liste. Brauchte ich mal um mein NAS ins Netz zu hängen.

Aber das wollte ich nicht dem Zufall überlassen, sondern auch das nötige Hintergrundwissen mir aneignen.

Vielleicht hilft es Dir weiter.

 

[FrankN]

Genau die WAN IP suche ich. Die Frage ist nur, wie bekomme ich das ganze in VB eingebaut? Ich benötige also die Syntax für Sowas:
MeineWANIPReturn = VBCommand( nslookup meineip.dyndns.org )
MeineWanIp = Parse( MeineWANIPReturn )
Und genau da liegt mein Problem. Mit VB habe ich jetzt noch nich sooo viel programmiert. Zentral fehlt mir die Syntax dafür, wie ich einen Commandline Bedehl absetzen und den Rückgabewert abfangen kann.

Edit:

Habs gefunden. Bin nach ewig langem Suchen über diesen Post im SysInternals Forum gestoßen:
http://forum.sysinternals.com/forum_posts.asp?TID=20527

Trotzdem Danke für die Antworten.