wie gehe ich denn am besten vor um zu prüfen ob eine URL noch funktioniert?
Dabei möchte ich auch den Fehler rauskriegen, also 404, 403 usw...

Danke im voraus
Johannes

Dafür gibt es die Komponente TNMHTTP

Ich habe irgendwo gelesen, dass man lieber die Indy Komponenten als die FastNet Komponenten benutzen soll, da die sehr buggy sein sollen...

Bei den Indys muss ich dann schätze ich mal IdHTTP, aber wie genau gehe ich da vor, wenn ich da eine URL testen will. Hat da vielleicht jemand ein Snippet zur Hand...?

Ja, du kannst auch die Indy-Komponente nehmen.
Was du auch nimmst, schau dir doch erstmal die Dokus und die Beispiele an, die es zu beiden gibt.

bis bald
akari

also, ich versuche jetzt Adressen in Memo1 zu prüfen und in Memo2 soll der entsprechende ResponseCode ausgegeben werden...also 200, 404, 403 usw...
aber irgendwie klappts das so noch nicht, in BCB wird jedesmal eine Exception ausgelöst, trotz try catch....immer ein Fehler des Typs EIdProtocolReplyError

for(i=0;i<lcount;i++)
        {
        if(IdHTTP1->Connected()) IdHTTP1->Disconnect();
        try
                {
                IdHTTP1->Get(Memo1->Lines->Strings[i]);
                Memo2->Lines->Strings[i]=IdHTTP1->ResponseCode;
                }
        catch(EIdProtocolReplyError &e)
                {
                Memo2->Lines->Strings[i]=IdHTTP1->ResponseCode;
                }
        }

kann mir da jemand helfen?

Läuft ohne Fehler

http://www.marquardtnet.info/cecke/programme.4/alive.42/42_alive.html

Statuscode Beschreibung
100 Continue
101 Switching Protocols
200 O.K.
201 Created
202 Accepted
203 Non-Authoritative Information
204 No Content
205 Reset Content
206 Partial Content
300 Multiple Choices
301 Moved Permanently
302 Moved Temporarily
303 See Other
304 Not Modified
305 Use Proxy
306 Reserviert
307 Temporary Redirect
400 Bad Request
401 Unauthorized
402 Payment Requiered
403 Forbidden
404 Not Found
405 Method not allowed
406 Not Acceptable
407 Proxy Authentication Required
408 Request Timeout
409 Conflict
410 Gone
411 Length Requiered
412 Precondition Failed
413 Request Entity Too Large
414 Request-URI-Too Large
415 Unsupported Media Type
416 Requested Range Not Satisfiable
417 Exception Failed
500 Internal Server Error
501 Not Implemented
503 Service Unavailable
504 Gateway Timeout
505 HTTP Version Not Supported

for(i=0;i<20;i++)
        {
        Memo1->Lines->Strings[i]="zeile";
        }

dabei werden nur 2 anstatt 20 zeilen geschrieben, aber woran hängts?

- was hast das noch mit diesem Thread zu tun?
- wiviele Zeilen sind denn vorher in dem Memo? Wenn du einfach 20 neue Zeilen willst, must du ->Lines->Add("Zeile") machen

bis bald
akari

Zu 302:

Dann solltest du im Catchzweig auf die Nummer prüfen.

Memo1->Lines->Strings[x]="zeile x";

ersetzt die i-te Zeile im Memo durch "zeile x". Ist die Zeile nicht vorhanden, kommt eine Zugriffsverletzung.

Memo1->Lines->Strings[x]=Memo1->Lines->Strings[x]+"zeile x";

fügt "zeile x" an die i-te Zeile an. Zugriffsverletzung...

Dann gibt es noch Lines->Insert() und Lines->Add().

Was willst du also?

bis bald
akari

for(i=0;i<lcount;i++)
        {
        if(IdHTTP1->Connected()) IdHTTP1->Disconnect();
        try
                {
                IdHTTP1->Get(Memo1->Lines->Strings[i]);
                Memo2->Lines->Strings[i]=IdHTTP1->ResponseCode;
                ShowMessage(IdHTTP1->ResponseCode);
                }
        catch(EIdProtocolReplyError &e)
                {
                Memo2->Lines->Strings[i]=IdHTTP1->ResponseCode;
                }
        }
}

Memo2 ist 20 Zeilen groß, im try Block wird bei der ersten Ausführung alles gemacht, ab der zweiten Ausführung (für i=1) wird Memo2->Lines->Strings...nicht mehr ausgeführt, bzw es erscheint nichts in dieser Zeile, ShowMessage wird aber korrekt ausgeführt...

Da du ja immer in das Memo2 schreibst sollte folgendes funktionieren:

for(i=0;i<lcount;i++)
        {
        if(IdHTTP1->Connected()) IdHTTP1->Disconnect();
        try
                {
                IdHTTP1->Get(Memo1->Lines->Strings[i]);
                Memo2->Lines->Add(IdHTTP1->ResponseCode);
                ShowMessage(IdHTTP1->ResponseCode);
                }
        catch(EIdProtocolReplyError &e)
                {
                Memo2->Lines->Add(IdHTTP1->ResponseCode);
                }
        }
}

Des Weiteren ist m.E. das

if(IdHTTP1->Connected()) IdHTTP1->Disconnect();

verbinden falsch. Damit wird eine Verbindung zu einem Server hergestellt. Das hat die Klasse geerbt, aber das willst du ja so direkt nicht (jedenfalls keine "Dauerverbindung"). Die Klasse sollte intern bei einem Get selbst die Verbindung herstellen und wieder beenden. Das sollte nur mit dem Get funktionieren. Das funktioniert jedenfalls bei TNMHTTP so. Hier könnte es analog so sein.

Beim ersten Lauf wird geprüft, ob HTTP-Connect ist.Wenn ja wird die Connection beendet.

Dann wird der Response abgesetzt.

Auf eine nicht bestehende Verbindung??
Wozu dann die Prüfung bei jedem Durchlauf?
Wann wird die Verbindung erstellt?