Prüfen, ob eine URL funktioniert?

[AlexII]

Hallo,

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

[DeddyH]

Du könntest es mit InternetOpenURL() versuchen (spontaner Gedanke).

[Die Muhkuh]

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

[AlexII]

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]

Die Indys brauchst Du dafür: TIdHTTP.

[AlexII]

Oh.. am besten ohne die...
Bis man sie installiert hat, hat man graues Haar.

[Die Muhkuh]

Eine Sache von 10 Minuten...

[AlexII]

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.

[Klaus01]

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

Grüße
Klaus

[AlexII]

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?