Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Prüfen, ob eine URL funktioniert? (https://www.delphipraxis.net/139554-pruefen-ob-eine-url-funktioniert.html)

AlexII 31. Aug 2009 16:50


Prüfen, ob eine URL funktioniert?
 
Hallo,

wie prüft man, ob eine URL funktioniert bzw. die Webseite erreichbar ist?

DeddyH 31. Aug 2009 16:52

Re: Prüfen, ob eine URL funktioniert?
 
Du könntest es mit InternetOpenURL() versuchen (spontaner Gedanke).

Die Muhkuh 31. Aug 2009 16:53

Re: Prüfen, ob eine URL funktioniert?
 
Oder per IdHTTP.Head und schauen, ob der Response-Code 200 (= Alles ok) ist.

AlexII 31. Aug 2009 17:22

Re: Prüfen, ob eine URL funktioniert?
 
Zitat:

Zitat von Die Muhkuh
Oder per IdHTTP.Head und schauen, ob der Response-Code 200 (= Alles ok) ist.

Braucht man dafür irgendwelche Komponente? Was kommt in die Uses rein?

Die Muhkuh 31. Aug 2009 17:25

Re: Prüfen, ob eine URL funktioniert?
 
Die Indys brauchst Du dafür: TIdHTTP.

AlexII 31. Aug 2009 17:32

Re: Prüfen, ob eine URL funktioniert?
 
Oh.. am besten ohne die... :roteyes:
Bis man sie installiert hat, hat man graues Haar. :lol:

Die Muhkuh 31. Aug 2009 17:38

Re: Prüfen, ob eine URL funktioniert?
 
Eine Sache von 10 Minuten...

AlexII 31. Aug 2009 17:41

Re: Prüfen, ob eine URL funktioniert?
 
Zitat:

Zitat von Die Muhkuh
Eine Sache von 10 Minuten...

Ich hab Delphi 7PE, da ist es nicht so leicht, hab min. 10 Stunden gebraucht und doch nicht hinbekommen. :roteyes:

Klaus01 31. Aug 2009 18:01

Re: Prüfen, ob eine URL funktioniert?
 
.. vielleicht ist das ja etwas für Dich (ohne Indy).

Grüße
Klaus

AlexII 31. Aug 2009 18:14

Re: Prüfen, ob eine URL funktioniert?
 
Zitat:

Zitat von Klaus01
.. vielleicht ist das ja etwas für Dich (ohne Indy).

Bekomme folgende Fehlermeldung:

Delphi-Quellcode:
[Fehler] Unit1.pas(28): Undefinierter Bezeichner: 'HINTERNET'
[Fehler] Unit1.pas(36): Undefinierter Bezeichner: 'InternetOpen'
[Fehler] Unit1.pas(37): Undefinierter Bezeichner: 'INTERNET_OPEN_TYPE_PRECONFIG_WITH_NO_AUTOPROXY'
[Fehler] Unit1.pas(38): Undefinierter Bezeichner: 'InternetOpenUrl'
[Fehler] Unit1.pas(39): Undefinierter Bezeichner: 'INTERNET_FLAG_NO_UI'
[Fehler] Unit1.pas(40): Inkompatible Typen
[Fehler] Unit1.pas(55): Undefinierter Bezeichner: 'HttpQueryInfo'
[Fehler] Unit1.pas(55): Undefinierter Bezeichner: 'HTTP_QUERY_STATUS_CODE'
[Fehler] Unit1.pas(81): Undefinierter Bezeichner: 'InternetCloseHandle'
[Fataler Fehler] Project1.dpr(5): Verwendete Unit 'Unit1.pas' kann nicht compiliert werden
Muss da was in die Uses rein?

DeddyH 31. Aug 2009 18:19

Re: Prüfen, ob eine URL funktioniert?
 
Versuch es mal mit WinInet.

AlexII 31. Aug 2009 18:26

Re: Prüfen, ob eine URL funktioniert?
 
Zitat:

Zitat von Klaus01
.. vielleicht ist das ja etwas für Dich (ohne Indy).

Und wie funkt der Code? :gruebel:

Mit
Delphi-Quellcode:
IsUrlValid('www.google.de');
irgendwie nicht... :gruebel:

DeddyH 31. Aug 2009 18:27

Re: Prüfen, ob eine URL funktioniert?
 
Ohne Protokollangabe wird das wohl auch nix. Versuch mal http://www.google.de

AlexII 31. Aug 2009 18:36

Re: Prüfen, ob eine URL funktioniert?
 
Wenn die URL nicht verfügbar ist hängt sich das Prog auf. :roteyes:

DeddyH 31. Aug 2009 18:48

Re: Prüfen, ob eine URL funktioniert?
 
Dann setz doch einen Timeout.

AlexII 31. Aug 2009 18:53

Re: Prüfen, ob eine URL funktioniert?
 
Zitat:

Zitat von DeddyH
Dann setz doch einen Timeout.

Das ist neu für mich, wie funktioniert das?

DeddyH 31. Aug 2009 18:56

Re: Prüfen, ob eine URL funktioniert?
 
MSDN-Library durchsuchenInternetSetOption, und da mal die möglichen Werte für dwOption anschauen.


Alle Zeitangaben in WEZ +1. Es ist jetzt 02:35 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz