Funktionen mit Delphi in PHP-Script..

**TheMiller**

Hey..

also, erstmal das Off-Topic: Ich habe mich durch mehrere Foren durchgeschlagen und bin jetzt wieder bei der DP gelandet, bei der ich schon länger bin... Ich muss sagen, es ist schön, "wieder zu Hause zu sein"!.

das nur am Rande. Jetzt mei Prob...

Ich habe folgenden Code:

markieren

Delphi-Quellcode:

			var sl : TStringlist;

begin

  sl := TStringList.Create;

  sl.Add('$db_server='+Edit1.Text);

  sl.Add('$db_name='+Edit2.Text);

  sl.Add('$db_user='+Edit3.Text);

  sl.Add('$db_passwort='+Edit4.Text);

  Memo1.Text := idHttp1.Post('http://www.xxx.de/script.php',sl);

  FreeAndNil(sl);

end;

und eine solche PHP-Datei mit Funktionen:

zusammenfalten · markieren

Delphi-Quellcode:

			<?PHP

  $db_server=$_POST['$db_server']; 

  $db_name=$_POST['$db_name'];

  $db_user=$_POST['$db_user'];

  $db_passwort=$_POST['$db_passwort'];

  $test='hallo';

  $aaa=$_POST['$aaa'];

  $bbb=$_POST['$bbb'];

/*echo     $_POST['$db_server'].chr(13).chr(10);*/

/*echo     $_POST['$db_name'].chr(13).chr(10);*/

/*echo     $_POST['$db_user'].chr(13).chr(10);  */  

/*echo     $_POST['$db_passwort'].chr(13).chr(10);*/

/*echo     $test;*/

function connect()

{

$db = @MYSQL_PCONNECT($db_server,$db_user,$db_passwort)

    or die ("Konnte keine Verbindung zur Datenbank herstellen");  $db_select = @MYSQL_SELECT_DB($db_name);  if($db_select)    echo "Datenbank wurde ausgewählt";

}

function insert()

{

$result = mysql_query("INSERT INTO test (aaa,bbb)

    VALUES ('sss','sss')");

  $var = mysql_insert_id();   echo $var;

echo mysql_error();

}

?>

Wie kann ich jetzt auf die einzelnen Funktionen zugreifen. Es soll nämlich nich immer jede aufgerufen werden...?

Danke im Vorraus!

Was du bräuchtest wäre ein weiterer Parameter, der angibt, welche Funktion ausgeführt werden soll:

markieren

Code:

			<?php

/* blubb */

switch ($mode) {

  case "connect":

    connect();

    break;

  case "insert":

    insert();

    break;

}

function connect()

{

$db = @MYSQL_PCONNECT($db_server,$db_user,$db_passwort)

    or die ("Konnte keine Verbindung zur Datenbank herstellen");  $db_select = @MYSQL_SELECT_DB($db_name);  if($db_select)    echo "Datenbank wurde ausgewählt";

}

function insert()

{

$result = mysql_query("INSERT INTO test (aaa,bbb)

    VALUES ('sss','sss')");

  $var = mysql_insert_id();   echo $var;

echo mysql_error();

}

?>

Die Variable $mode muss dann natürlich in deinem Delphi-Programm gesetzt werden, je nachdem, was gemacht werden soll.

**TheMiller**

Hm, habs probiert, aber nicht so ganz hinbekommen.

Wie würde denn der Aufruf aussehen?

In etwa so:

zusammenfalten · markieren

Delphi-Quellcode:

			var sl : TStringlist;

begin

  sl := TStringList.Create;

  sl.Add('$db_server='+Edit1.Text);

  sl.Add('$db_name='+Edit2.Text);

  sl.Add('$db_user='+Edit3.Text);

  sl.Add('$db_passwort='+Edit4.Text);

  sl.Add('$mode=connect'); // <-- oder eben insert, je nachdem, was du grad' machen willst

  Memo1.Text := idHttp1.Post('http://www.xxx.de/script.php',sl);

  FreeAndNil(sl);

end;

Und was ich vorher vergessen hatte: Wenn der Server mit PHP3 (und nicht PHP4) läuft, müssen die beiden Funktionen über dem switch-Konstrukt stehen.

**TheMiller**

Hm,

kannst du bitte mal nachsehen, ob die funktionen richtig aufgebaut sind und funktionieren müssen? Das tun sie nämlich nicht. Ich bekomme keinen Fehler, aber auch keine Erfolgsmeldung. Gar nix ;-(

**TheMiller**

Ok, ich habe selbst die Lösung.

Der Fehler lag bei der VariablenÜbergabe/Deklaration.

Es muss noch ganz oben

$mode=$_POST['$mode']; hinzugefügt werden. Jetzt funzt alles wunderbar

Naja, kommt auf die PHP-Kongiguration an

**TheMiller**

Kann man das auch vereinfachen?

Wenn ja, wie?

PS: habe PHPAdmin

**titus**

es heißt aber $mode = $_POST['mode'];

Du kannst register_globals = On setzen dann geht $mode wieder.
Aber: Nicht zu empfehlen, da dann ja auch von $_GET['mode'] oder $_COOKIE['mode'] oder von $_SESSION['mode'] kommen könnte...

Achja es geht noch mit:
extract($_POST); // ganz oben in die Zeile, dann kannst du wie gewohnt $mode benutzen.

Lt. php.net auch nicht zu empfehlen.

mfG

**TheMiller**

hm, dann lasse ich es so. Ist ja eine einmalige deklaration, da ich diese Variale global verwende..

Funktionen mit Delphi in PHP-Script..

Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Re: Funktionen mit Delphi in PHP-Script..

Forumregeln

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#3 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 16:39 Hm, habs probiert, aber nicht so ganz hinbekommen. Wie würde denn der Aufruf aussehen?
	Zitat

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#5 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 17:11 Hm, kannst du bitte mal nachsehen, ob die funktionen richtig aufgebaut sind und funktionieren müssen? Das tun sie nämlich nicht. Ich bekomme keinen Fehler, aber auch keine Erfolgsmeldung. Gar nix ;-(
	Zitat

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#6 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 18:23 Ok, ich habe selbst die Lösung. Der Fehler lag bei der VariablenÜbergabe/Deklaration. Es muss noch ganz oben $mode=$_POST['$mode']; hinzugefügt werden. Jetzt funzt alles wunderbar
	Zitat

tommie-lie (Gast) n/a Beiträge	#7 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 18:27 Naja, kommt auf die PHP-Kongiguration an
	Zitat

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#8 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 18:28 Kann man das auch vereinfachen? Wenn ja, wie? PS: habe PHPAdmin
	Zitat

TheMiller Registriert seit: 19. Mai 2003 Ort: Gründau 2.480 Beiträge Delphi XE7 Architect	#10 Re: Funktionen mit Delphi in PHP-Script.. 12. Okt 2004, 18:34 hm, dann lasse ich es so. Ist ja eine einmalige deklaration, da ich diese Variale global verwende..
	Zitat