Entwickler-Ecke
Internet / Netzwerk - IP herausfinden?
Wolle92 - So 16.09.07 15:01
Titel: IP herausfinden?
Hallo,
kann mir jemand sagen, wie ich die IP-Adresse, die im Internet angezeigt wird, also nicht die Netzwerk-IP-Adresse, mit Delphi herausfinden kann?
JayEff - So 16.09.07 15:04
Nun ein wirklich zuverlässiges Ergebnis zu bekommen ist sicher schwer, wegen Firewall&Proxy, Router etc.
Eine Idee wäre,
http://www.wieistmeineip.de aufzurufen und die dortige IP zu suchen.
Wolle92 - So 16.09.07 15:14
im Quellcode der Seite sieht man auch, es ist nicht schwer:
Quelltext
1:
| <h1 class="ip">Hier steht die IP-Adresse</h1> |
also ungefähr so:
Delphi-Quelltext
1:
2:
3:
4:
| wimip := IdHTTP1.Get('www.wieistmeineip.de');
pos1 := Pos('<h1 class="ip">',wimip)+15;
pos2 := Pos('</h1>',wimip);
ip := Copy(wimip,pos1,pos2-pos1); |
Wolle92 - So 16.09.07 15:24
Das klappt nicht... gibt immer ein "Connection reset by peer"... woran könnte das liegen?
Calculon - So 16.09.07 16:02
Delphi-Quelltext
1:
| wimip := IdHTTP1.Get('http://www.wieistmeineip.de/'); |
Wolle92 - So 16.09.07 16:07
Danke!
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!