Programm funktioniert nicht mehr - kurioses Routerproblem

**Yheeky**

Hi,

also ich hab gestern ein kurioses Problem bekommen. Gegen Mittag führte ich mein Programm aus, welches über folgende Funktion verfügt:

zusammenfalten · markieren

Delphi-Quellcode:

			
function GetOwnIP : String;

var WebAddress, IPVar : string;

begin

 WebAddress   := 'http://checkip.dyndns.org/';

  try

    frmMain.NMHTTP1.Get(WebAddress);

  except

  end;

  frmMain.Memo1.Text     := frmMain.NMHTTP1.Body;

  frmMain.Memo1.SelStart := 0;

  IPVar := StringReplace(frmMain.Memo1.Text , '<html><head><title>Current IP Check</title></head><body>Current IP Address: ', '', [rfReplaceAll]);

  Result := Copy(IPVar,0, Pos('</body></html>', IPVar)-1);

end;

Hierbei lese ich die IP Adresse aus dem Internet aus. Hatte bis gestern Mittag auch funktioniert, aber auf einmal ging nichts mehr. Ich hab nichts geändert oder gemacht.

Zur Problemlösung:
Ich habe einen Router, der mir die letzten Tage ein paar Probleme gemacht hat, aber ich dachte er funktioniert wieder. Nun kommt folgende Fehlermeldung, wenn ich den o.g. Code ausführe:

markieren

Code:

Host-Lookup fehlgeschlagen.

Im Debugger wird die Zeile frmMain.NMHTTP1.Get(WebAddress); fett markiert.

Ich habe dann mein DSL Modem direkt an meinen PC angeschlossen um den Router zu umgehen. Auch hier kommt nun diese Fehlermeldung. Ich weiss nun nicht mehr weiter. Firewalls habe ich keine, auch die von Windows ist ausgestellt.

Das kuriose:
Wenn ich das Programm auf dem anderen Rechner, der an dem Router hängt, starte, funktioniert alles!

Ich hoffe mir kann jemand weiterhelfen.

Gruß Yheeky

**jim_raynor**

Kannst du mit deinem Rechner noch über einen Browser, auf diese oder andere Seiten zugreifen. Ich vermute mal nicht. Es wird also irgendwo Probleme mit den Netzwerkeinstellungen geben.

**Yheeky**

Doch. Internet, ICQ und der Filetransfer in ICQ funktioniert auch. Selbstgeschriebene Chatprogramme funktionieren allerdings nicht mehr, nur noch auf dem anderen Rechner, der am Router angeschlossen ist.

**angos**

Hmm, ich hatte mal das Problem, dass die svchost durch meine Firewall gesperrt wurde. Sicher das keine Firewall im Hintergrund läuft?
Ansonsten kann es ja eigentlich nicht mit dem Router zusammenhängen, da dieser ja mit anderen Rechnern problemlos funktioniert.

**Luckie**

Die svchost hat damit wohl wennig zu tun,das ist nur die Host anwendung für Systemdienste und hat im Internet eigentlich nichts verloren.

**c.wuensch**

Sind denn die DNS-Server in den Netzwerkeinstellungen korrekt gesetzt?
Wenn du dir nicht sicher bist, stelle am besten testweise mal auf "IP-Adresse automatisch beziehen" um.

Cu, Chris

**Yheeky**

Auch das ist auf beiden Rechnern eingestellt...komme wohl nicht an ner Formatierung vorbei. Oder kann´s an der OnBoard-Netzwerkkarte liegen?

Programm funktioniert nicht mehr - kurioses Routerproblem

Programm funktioniert nicht mehr - kurioses Routerproblem

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Re: Programm funktioniert nicht mehr - kurioses Routerproble

Forumregeln

jim_raynor Registriert seit: 17. Okt 2004 Ort: Berlin 1.251 Beiträge Delphi 5 Standard	#2 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 15:32 Kannst du mit deinem Rechner noch über einen Browser, auf diese oder andere Seiten zugreifen. Ich vermute mal nicht. Es wird also irgendwo Probleme mit den Netzwerkeinstellungen geben. Christian Reich Schaut euch mein X-COM Remake X-Force: Fight For Destiny ( http://www.xforce-online.de ) an.
	Zitat

Yheeky Registriert seit: 7. Jun 2002 1.339 Beiträge	#3 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 16:12 Doch. Internet, ICQ und der Filetransfer in ICQ funktioniert auch. Selbstgeschriebene Chatprogramme funktionieren allerdings nicht mehr, nur noch auf dem anderen Rechner, der am Router angeschlossen ist.
	Zitat

angos Registriert seit: 26. Mai 2004 Ort: Rheine 549 Beiträge Delphi 11 Alexandria	#4 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 16:35 Hmm, ich hatte mal das Problem, dass die svchost durch meine Firewall gesperrt wurde. Sicher das keine Firewall im Hintergrund läuft? Ansonsten kann es ja eigentlich nicht mit dem Router zusammenhängen, da dieser ja mit anderen Rechnern problemlos funktioniert. Ansgar
	Zitat

Luckie Registriert seit: 29. Mai 2002 37.621 Beiträge Delphi 2006 Professional	#5 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 16:37 Die svchost hat damit wohl wennig zu tun,das ist nur die Host anwendung für Systemdienste und hat im Internet eigentlich nichts verloren. Michael Ein Teil meines Codes würde euch verunsichern.
	Zitat

c.wuensch Registriert seit: 19. Dez 2004 Ort: Münster 96 Beiträge	#6 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 19:48 Sind denn die DNS-Server in den Netzwerkeinstellungen korrekt gesetzt? Wenn du dir nicht sicher bist, stelle am besten testweise mal auf "IP-Adresse automatisch beziehen" um. Cu, Chris
	Zitat

Yheeky Registriert seit: 7. Jun 2002 1.339 Beiträge	#7 Re: Programm funktioniert nicht mehr - kurioses Routerproble 15. Jun 2005, 23:20 Auch das ist auf beiden Rechnern eingestellt...komme wohl nicht an ner Formatierung vorbei. Oder kann´s an der OnBoard-Netzwerkkarte liegen?
	Zitat