Avatar billede skovjuul Nybegynder
11. marts 2008 - 22:53 Der er 15 kommentarer og
1 løsning

Få fat på min eksterne ip-adresse fra router

Hola

I et netværk med en dynamisk ekstern ip-adresse har jeg brug for at kende min nuværende adresse så jeg kan checke på om den skifter.
Er det noget der er muligt at lave i delphi eller skal det være i et andet sprog/script?
Min plan var at checke på den sidst kendte adresse med den nuværende og hvis de ikke er ens så afsende en mail til mig selv med den nye adresse. Alt det med email osv. har jeg styr på, bare ikke hvordan jeg får fat på routerens ip-adresse.

På forhånd tak for hjælpen
Jesper
Avatar billede leif Seniormester
11. marts 2008 - 22:55 #1
Hvis det er fordi du har et eller andet udefra som skal forbinde, så er en bedre løsning da noget dyndns.


Hvad er det for en router du har ?
Avatar billede spil2vind Nybegynder
11. marts 2008 - 23:02 #2
Kan du ikke lade dig program hente din adresse hos http://www.myip.dk/ også aflæse den HTML side du får som resultat?
Avatar billede skovjuul Nybegynder
11. marts 2008 - 23:07 #3
Det er en 3-router. Eller det er faktisk min svigerfars og den står i Sverige. Han har DynDns installeret men han synes den falder for meget ud så han ville gerne have en ip-adresse tilsendt i stedet.

Alternativet med myip.dk kunne virke, men er ikke særlig køn?
Avatar billede leif Seniormester
11. marts 2008 - 23:08 #4
Falder for meget ud, hvad mener du ?
Avatar billede skovjuul Nybegynder
11. marts 2008 - 23:15 #5
At den er for lang tid om at opdatere efter hans adresse er skiftet, så der er lange perioder hvor han ikke har kontakt til sin computer
Avatar billede leif Seniormester
11. marts 2008 - 23:18 #6
Okay, jeg har normalt kun været uden kontakt, i hvad er det, max 5 min., når jeg har haft brugt DynDNS til opgaven. Men okay. Det var blot et forslag, men over and out ellers herfra da Delphi, VB og lign. ikke er min bold gade.
Avatar billede skovjuul Nybegynder
11. marts 2008 - 23:22 #7
ok, tak for forsøget... håber der er andre der er mere inde i det? :)
Avatar billede kroning Nybegynder
11. marts 2008 - 23:45 #8
Det vil være hurtig at lave en lille funktion der henter WAN adressen fra f.eks. myip.dk som spil2vind skriver. Men Indy kan det laves med 10 liniers kode.
Avatar billede kroning Nybegynder
12. marts 2008 - 00:32 #9
Du kunne også benytte en STUN server.
http://www.ietf.org/rfc/rfc3489.txt?number=3489
Avatar billede martinlind Nybegynder
12. marts 2008 - 02:36 #11
eller :

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdBaseComponent, IdComponent, IdTCPConnection, IdTCPClient,
  IdHTTP, StdCtrls;

type
  TForm1 = class(TForm)
    Button1: TButton;
    IdHTTP1: TIdHTTP;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
    IP : string;
begin
    IP:=IdHTTP1.Get('http://ip.xten.net/');
  ShowMessage('Din eksterne ip er: '+IP);
end;

end.
Avatar billede skovjuul Nybegynder
12. marts 2008 - 06:00 #12
Jeg villle helst ikke være afhænging af en ekstern hjemmeside (der kan forsvinde) hvis det er muligt...
Kroning: Jeg fik desværre ikke så meget ud af siden med STUN :) Ville du have noget i mod at vise din INDY idé?
Avatar billede kroning Nybegynder
12. marts 2008 - 09:38 #13
Ja den er magen til den som martinlind har postet, men den er jo afhængig af en ekstern hjemmeside.
Mht. STUN jeg lavede engang en STUN klasse jeg fik den aldrig lavet 100% færdig men den kan vise din IP. Men jeg ville vælge løsningen med en ekstern hjemmeside, man kan jo evt. bruge flere sider for at være sikker på at een af dem virker.
Disse sider kræver så lidt mere kode for at hive IP´en ud end som den martinlind bruger:

http://checkip.dyndns.org
http://www.myip.dk
Og der findes sikker mange andre.
Avatar billede skovjuul Nybegynder
12. marts 2008 - 10:00 #14
Kroning, smid et svar... Jeg holder mig til den eksterne hjemmeside, har et par private stykker rundt omkring jeg kan lægge mit php-script på :)

Mange tak for hjælpen alle.
Avatar billede kroning Nybegynder
12. marts 2008 - 10:05 #15
Nu var det ikke mig der kom med løsningen først.
Avatar billede spil2vind Nybegynder
12. marts 2008 - 11:08 #16
Hermed mit svar
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester