Einzelnen Beitrag anzeigen

Eichhoernchen

Registriert seit: 22. Apr 2004
Ort: Hagen
322 Beiträge
 
Turbo Delphi für Win32
 
#23

Re: Suche Beispiel zur Zusammenarbeit von php und Applikatio

  Alt 30. Sep 2005, 23:02
warum so kompliziert, es geht hier doch nur um bestimmte Werte.


Code:
<?php

if( (isset($_POST['param1'])) && (isset($_POST['param2'])) ) {
  echo "Alles angekommen!";
}else echo "Fehlerhaft";

?>
Und dann in Delphi so wie es zuvor für Post beschrieben war!

Delphi-Quellcode:
var
   Response:String;
   LParams: TStringlist;
begin
  LParams := TStringlist.Create;
  LParams.Add('param1=wert');
  LParams.Add('param2=wert2');
  Response := IdHTTP1.Post('http://www.mein-server.de/script.php', LParams);
  if response = 'Alles angekommen!'
    then //hier für angekommen
    else if response = 'Fehlerhaft'
            then //Variablen nicht übertragen
            else //Seite nicht erreicht
end;
Jan
  Mit Zitat antworten Zitat