Entwickler-Ecke :: Thema anzeigen

JungerIslaender - So 10.08.08 15:55
Titel: Wie ist meine ip

Hi Leute,

Ich würde gerne ein Programm schreiben da ich so etwas brauche (dazu später). Das Programm soll flogendes können: Es soll aus dem Internet, z.B. von "wie ist meine ip" die eigene ip auslesen (aber nicht die interne) und die dann per Email an eine bestimmte Anzahl Leute schicken. Dabei soll es alle 2h oder 1h gucken ob sich die ip geändert hat, wenn ja neue Email, wenn nicht dann nicht.

Hintergrund zum Programm: Ich hab einen FTP und Browser-Game Server aufgesetzt ( wer meine früheren Threads verfolgt hat wird also sehen das ich es endlich hingekriegt habe). Das Funktioniert in lokalen Netzwerk acuh wunder bar. Nun ist es so das wir eine dynamische ip von versanet (ka ob versanet oder tkom....) bekommen und die sich andauernd ändert. Nun möchte ich aber auch von wo anders als zuhause oder auch andere mensche auf den server zugreifen (grade bei einem Browsergame). Und dazu ist das Programm gedacht.

Vielen Dank im voraus MFG JungerIslaender

Moderiert von Christian S.: Topic aus Sonstiges (Delphi) verschoben am So 10.08.2008 um 16:00

Sinspin - So 10.08.08 16:16

An so einem Problem habe ich auch schonmal gehangen.
Anstatt die aktuelle IP an jeden zu versenden würde ich die IP in einer Datei auf einen frei zugänglichen Server legen.
So kann die dann jeder mit einem HTTP Client, zB. Indy, abfragen.
Das hat den Vorteil das du die IP Problemlos wesentlich öfter, einmal in der Minute oder so, prüfen kannst und sie dann neu hochladen wenn sie geändert wurde.
Und jeder kann die aktuelle IP jederzeit abrufen.

JungerIslaender - So 10.08.08 16:22

Hidden hat folgendes geschrieben:

Hi,

Was hältst du von einem Login? Wäre imho performanter, als auf jedem Rechner die ip an ne mailadresse zu Senden.

mfG,

Das verstehe ich schon mal net? Wie denn bitte Login wenn sich andauernd die ip ändert? Ich hab einen Computer der fungiert als server und der soll seine ip an die user sschicken damit die sich einliggen, und auf den Rechner zugreifen können.

---Moderiert von Narses: Beiträge zusammengefasst---

Sinspin hat folgendes geschrieben:

Das klingt gut, dann brüchte ich aber irgendwo anders webspace. Aber wenn du erklären könntest wie ich machen muss.

Hidden - So 10.08.08 16:39

JungerIslaender hat folgendes geschrieben:

Hidden hat folgendes geschrieben:

Was hältst du von einem Login? Wäre imho performanter, als auf jedem Rechner die ip an ne mailadresse zu Senden.

Ich habe deinen post wohl oberflächlich gelesen, sry. Hatte dich so verstanden, dass du die IP als deine Identifikation bzgl. Server-Zugriff verwendest :)

Moderiert von Narses: Zitat gekürzt

Boldar - So 10.08.08 17:31

IP ermitteln:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

function LocalIP:string;
var
  WSA  : TWSAData;
  ILen : integer;
  PHst : PChar;
  PHEn : PHostEnt;
begin
  WSAStartup( $0101, WSA );
  ILen := $FF;
  PHst := StrAlloc( ILen );
  gethostname( PHst, ILen );
  PHEn := gethostbyname( PHst );

  with PHEn^ do  result:=format(
   '%d.%d.%d.%d',
   [ord(h_addr^[ 0 ]), ord(h_addr^[ 1 ]),
   ord(h_addr^[ 2 ]), ord(h_addr^[ 3 ])]);
  StrDispose( PHst );
  WSACleanup;

end;

Boldar - So 10.08.08 17:51
Titel: Re: Wie ist meine ip

JungerIslaender hat folgendes geschrieben:

Hi Leute,
Es soll aus dem Internet, z.B. von "wie ist meine ip" die eigene ip auslesen

Das ist nicht nötig. Deshalb mein Post. Also nicht am Thema vorbei!!!

GTA-Place - So 10.08.08 20:39

Wie kann man die eigene Internet-IP-Adresse ermitteln? [http://www.delphi-library.de/topic_Internet+IP+ueber+Internetseite+herausfinden_74581.html]

Aber warum so umständlich. Wie oben erwähnt: DynDNS-Acc anlegen, DynDNS-Programm auf Server starten, fertig.

BenBE - So 10.08.08 20:40

Für sowas gibt es [url]http://www.DynDNS.org[/url]. So betreib ich seit Jahren meinen Heimserver UND NOCH NIE Probleme. Können inzwischen sogar die Router problemlos --> Einmal konfiguriert, funzt immer.

Alles andre sind WÜRG-AROUNDS!

Timosch - So 10.08.08 21:10

Boldar hat folgendes geschrieben:

JungerIslaender hat folgendes geschrieben:

Hi Leute,
Es soll aus dem Internet, z.B. von "wie ist meine ip" die eigene ip auslesen

Das ist nicht nötig. Deshalb mein Post. Also nicht am Thema vorbei!!!

Deine Funktion heißt sogar LocalIP. Also doch am Thema vorbei...

JungerIslaender - Mo 11.08.08 13:37

BenBE hat folgendes geschrieben:

Das klingt sehr gut! Könntest du mal erklären wie das funktioniert und was ich machen muss. Bin auf der Website nicht sehr schlau geworden. Vor allem mit den Preisen.

Xentar - Mo 11.08.08 13:48

- Du registrierst dich bei DynDNS und bekommst dann eine Adresse, die du dir selber aussuchen kannst, z.B. JungerIslaender.dyndns.com oder so ähnlich.

Nun zwei Möglichkeiten:
1. Wenn du dich selber ins Internet einwählst (DFÜ): Du lädst dir ein Programm von denen herunter. Dieses Programm macht genau das, was du auch vorhast. Es sendet relgemäßig / bei Änderung deine aktuelle IP Adresse an DynDNS, so dass die oben genannte Adresse immer auf deine aktuelle IP "zeigt".
2. Wenn du einen Router hast funktioniert dieses Programm soweit ich weiß nicht korrekt - hierfür gibts in den meisten Routern eine Einstellung, dass dieser dann selber regelmäßig seine aktuelle IP zu DynDNS schickt.

Ergebnis: Du bist immer über die gewünschte Adresse erreichbar.

Edit: Die Basisfunktionen von DynDNS sind übrigens kostenlos. Du musst nur etwas zahlen, wenn du mehr Funktionen, z.B. mehrere Adressen haben möchtest.

wazup - Mo 11.08.08 17:17

Meinst du sowas:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:

uses
  IdHTTP

function GetInternetIP(): string;
var
  IdHTTP: TIdHTTP;
  Temp: string;
begin
  Result := '';

  IdHTTP := TIdHTTP.Create;
  try
    Temp := IdHTTP.Get('http://checkip.dyndns.org');
  finally
    IdHTTP.Free;
  end;

  Result := Copy(Temp, Pos(':', Temp) + 2, Pos('</bo', Temp) - Pos(':', Temp) - 2);
end;

Narses - Mo 11.08.08 18:15

Moin!

wazup hat folgendes geschrieben:

Meinst du sowas:

Nein, eigentlich meint er einen dynamischen DNS-Alias. ;)

wazup hat folgendes geschrieben:

Delphi-Quelltext

1:
2:
3:

function GetInternetIP(): string;
...
Result := Copy(...

Dieser Ansatz ist zu unflexibel, besser so [http://www.delphi-library.de/topic_Internet+IP+ueber+Internetseite+herausfinden_74581.html]. :idea:

cu
Narses

JungerIslaender - Mo 11.08.08 21:35

Jetstream hat folgendes geschrieben:

dyndns hat bei mir in letzter zeit probleme gemacht, bin auf afraid.org umgestiegen.

Mein Router (WRT45GL mit Tomato-Firmware) unterstützt das sogar :)

Was für Probleme hattest du denn geanu??

Weil sonst benutze ich dynds.

Und ja ich habe einen Ruter. Was muus ich dann machen?(Einfach alles hinterfragen damit es später läuft ^^ :D)

JungerIslaender - Mi 24.09.08 19:36

So um das jetzt noch mal aufzugreifen: Ich kriege das mit dyn ds nicht hin. Ka wie das läuft.

Außerdem: Ich habe jetzt ein Programm das ermittelt wie meine ip Adresse ist, Wie veröffentliche ich die jetzt regelmäßig auf anderem webspace oder schicke sie ausgewählten Leuten per Email?

Xentar - Mi 24.09.08 19:52

JungerIslaender hat folgendes geschrieben:

Außerdem: Ich habe jetzt ein Programm das ermittelt wie meine ip Adresse ist, Wie veröffentliche ich die jetzt regelmäßig auf anderem webspace oder schicke sie ausgewählten Leuten per Email?

Wozu umständlich, wenns auch einfach geht? Richte dir nen DynDNS ein und gut ist.
Woran genau scheiterts denn?
Bei DynDNS anmelden, danach den Router konfigurieren (oder, wenn der das nicht unterstützt, die Software von denen runterladen), und fertig..

JungerIslaender - Do 25.09.08 21:37

Ich krieg das nicht hin mit dem anmelden außerdem hab ich Angst dass es etwas kostet da ich ja meinen echten namen adresse usw. eingeben muss.

Ansonsten interessiert mich einfach das schreiben dess programms. Auch wenn ich es nicht benutzte. Programmieren macht Spasssssssssssssssssssssssssssssssss.

MFG

Xentar - Do 25.09.08 21:40

Nein, DynDNS hat auch einen kostenlosen Dienst.

Aber wenn du unbedingt willst..
Das veröffentlichen per Mail kannst du z.B. mit den Indy Komponenten, speziell IdSMTP lösen. Dazu gibts sicherlich ein Beispiel, ansonsten mach dafür bitte einen eigenen Thread auf, da du ja deine IP nun schon rausgefunden hast.

jaenicke - Do 25.09.08 21:48

JungerIslaender hat folgendes geschrieben:

Ich krieg das nicht hin mit dem anmelden außerdem hab ich Angst dass es etwas kostet da ich ja meinen echten namen adresse usw. eingeben muss.

Erstens wäre es ohnehin nicht legal, wenn dir etwas berechnet würde, wo es nicht deutlich dransteht, zweitens ist das bei DynDNS der Fall, dass es dran steht. Kostenpflichtige Upgrades sind unmissverständlich entsprechend markiert und eine einfache dynamische Adresse wie in deinem Fall kostet nichts, ich benutze das wie viele andere auch.

Per Mail verschicken ist die eine Möglichkeit, du kannst auch ein PHP-Skript auf einen kostenlosen Webspace legen und diesem jeweils die aktuelle IP übergeben, indem du das Skript mit TIdHttp aufrufst.

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!