Suche: Anleitung für Delphi + Curl

[ph0g]

Weil es nicht geht... Ich darf die Seite leider nicht nennen um die es sich handelt, ich muss formulardaten an eine Seite senden, und warum auch immer, geht es nur mit curl. Habe genau das Selbe prozedere in PHP programmiert und da läuft es mit curl...
Mit indy bekomme ich entweder immer eine Fehler 301 oder einen Fehler 500 als antwort... vielleicht weiss ja jemand hier, was das zu bedeuten hat?

[Klaus01]

Zitat von ph0g:

Mit indy bekomme ich entweder immer eine Fehler 301 oder einen Fehler 500 als antwort... vielleicht weiss ja jemand hier, was das zu bedeuten hat?

301 Moved Permanently
Die angeforderte Ressource steht ab sofort unter
der im „Location“-Header-Feld angegebenen Adresse bereit.
Die alte Adresse ist nicht länger gültig.

Da hilft es vielleicht handleRedirects des HTTP Clients auf true zu setzen.

Grüße
Klaus

[ph0g]

wenn ich die handleredirects auf true setze, kommt der fehler 500 das habe ich mir nämlich auch gedacht

Fehler sind im Anhang: (ich verwende die .pas Dateien aus dem /src Ordner)

[Phoenix]

Dann musst Du die Sourcen halt an D2010 / Unicode anpassen. Ist doch jetzt nicht so wild, oder?

[ph0g]

und das mache ich wie? Sorry bin damit nicht so vertraut

[Phoenix]

Na, die Fehlermeldungen sagen doch ziemlich eindeutig aus, was an der Stelle nicht in Ordnung ist. Wenn Du dann ein bisschen nachdenkst und vielleicht auch mal nach dem Fehlertext Googlest oder hier in der DP suchst wirst Du rausbekommen wieso der Fehler auftritt und was man dagegen machen kann.

Ein bisschen Eigeninitiative ist hier schon gefragt.

[Klaus01]

Gute Abend,

das angehängte Programm führt diesen Code aus:

Delphi-Quellcode:

program simple;
  {$APPTYPE CONSOLE}
  uses curlobj;
  var 
    Curl: TCurl;
  begin
    Curl := TCurl.Create(nil);
    Curl.URL := 'http://curl.haxx.se/';
    Curl.OutputFile := 'curl.html';
    if not Curl.Perform then
      WriteLn(Curl.ErrorString);
    Curl.Free;
  end.

Es legt die Datei curl.html mit Inhalt an.
Erstellt mit Delphi XE Trial.


P.S. Ist das neu in Delphi XE, dass ein Debug\Win32 Verzeichnis unterhalb des Projektordners angelegt wird? Hat das einen tieferen Sinn?

Grüße
Klaus

[turboPASCAL]

Zitat:

P.S. Ist das neu in Delphi XE, dass ein Debug\Win32 Verzeichnis unterhalb des Projekordners angelegt wird? Hat das einen tieferen Sinn?

Ja, gehört aber nicht in diesen Thread.

[alfold]

Zitat von ph0g:

Weil es nicht geht... Ich darf die Seite leider nicht nennen um die es sich handelt, ich muss formulardaten an eine Seite senden, ...

Ich hoffe nur das Du damit nicht gegen die AGBs verstösst! und wir Dir evtl noch Helfen

alfold

[ph0g]

Mh naja was ich mich frage ist, warum das nicht geht, wenn es frisch gedownloadet ist. ich habe ja garnichts dran verändert? diese makewin.bat geht auch schon nicht..