Einzelnen Beitrag anzeigen

p.sprick

Registriert seit: 29. Jan 2009
20 Beiträge
 
#1

POST an PHP geht nicht Wieso

  Alt 11. Aug 2009, 12:56
Hallo Leute,
ich moechte per idHTTP.Post daten an ein PHP übergeben.
Es kommt aber nur

Test
Undefined index: email in test1.phpon line 3

Wen ich mit ISSET($_POST['email') arbeite kommt nur

Test

Aber wieso. Wo liegt der Fehler????

Gruss Paul

Hier der Quelltext:

Delphi-Quellcode:
  PostStrings: TStringList; //Zusammengesetze Post-Daten
  ResponseStream:TStringStream;//Ausgabe der Aufgerufenen Seite
  ausgabe:String; //Ausgabe der aufgerufenen Seite als String
  zeile:String; //Zum zeilenweisen Ausgeben der Rückgabe der Aufgerufenen Seite benutzte Zwischenvariable
  i:Integer; //Zähler für die For-Schleife
begin
  ResponseStream:=TStringStream.Create('');//Rückgabe-Stream erstellen
  PostStrings := TStringList.Create; //Post-Daten-StringList erstellen
  try
    PostStrings.Add('email=test@test.de'); //Post-Daten in die StringList eintragen
    try
      idHTTP.Post('http://ps-edv-online.de/test1.php', PostStrings,Responsestream);//Datei abrufen
      ausgabe:=ResponseStream.DataString; //Ausbage-Sring die zurückgegebenen Daten zuweisen
      zeile:=''; //Zwischenvariable leeren
      for i:=1 to Length(ausgabe) do begin //For-Schleife zum formatieren der Ausgabe (Zeilenumbrüche korrekt darstellen)
        if (ausgabe[i]=#13) and (ausgabe[i+1]=#10) then begin //Bei Zeilenumbruch
          ResponseMemo.Lines.Add(zeile);
          zeile:='';
        end else if ausgabe[i]<>#10 Then zeile:=zeile+ausgabe[i];
      end;
      ResponseMemo.Lines.Add(zeile);
    except //Fehlerbehandlung
     on E: Exception do
       showmessage('Error encountered during POST: ' + E.Message);
    end;
  finally
    PostStrings.Free;
    ResponseStream.Free;
  end;
end;
test1.php

Delphi-Quellcode:
<?php
echo "test";
echo $_POST['email'];
?>
  Mit Zitat antworten Zitat