VB 2008 php verbindung?

04/25/2010 12:23 nag#1
Hallo zusammen.
Ich habe vor ein Script mit Mysql zu "Unterstüzen", da mein Script etwas in der Datenbank verändern soll bzw. auslesen soll.
Ich möchte aber in meinem Script meine Daten nicht eintragen. Ich dachte mir etwas mit PHP aber das Problem ist ich muss dann auch Variabeln von VB in PHP schreiben und von PHP in VB. Das Script soll später veröffentlicht werden. Welche Lösung, bzw. Vorschläge hättet ihr? Sie sollen aber auch sicher sein...
Schonmal danke für jeden produktiven Vorschlag.
04/25/2010 19:16 Nosferatu.#2
WinSocks müsste es auch bei vb geben (bin aber net sicher)

Dabei Spielt dein Program den CLient, und schickt die daten die du eintragen möchtest zum Server, und dieser Server Trägt es dann für dich in die MYSQL DB ein :)

Oder mit hilfe PHP , Via POST(http) Method. Variablen zusammen setzen und der PHP übergeben.

zb:

Quote:
POST('http://www.deinesite.de/test.php?text='+Edit1.Text+'&site=add')
04/25/2010 19:46 nag#3
Ja vb untertützt Winsocks aber leider nur in Proffesional oder Enterprise und die hab ich leider nicht.
Mit der Post Methode versteh ich leider noch nicht.
Get wäre ja alles an das ende hängen. Für Login viel zu unsicher.
Wenn man den Login sicher machen kann, wäre get eine mögliche Alternative für Sql Befehle.
04/25/2010 20:40 Nosferatu.#4
Quote:
Originally Posted by nag View Post
Ja vb untertützt Winsocks aber leider nur in Proffesional oder Enterprise und die hab ich leider nicht.
Mit der Post Methode versteh ich leider noch nicht.
Get wäre ja alles an das ende hängen. Für Login viel zu unsicher.
Wenn man den Login sicher machen kann, wäre get eine mögliche Alternative für Sql Befehle.
Code:
procedure TForm1.Button1Click(Sender: TObject);
var  Params: TStringlist;
     aURL: String;
     hResult: String;
begin
Params:=TStringlist.Create;
aURL:='http://www.yoursite.de/test.php?';

with params do
begin
  Add('text='+Edit1.Text);
  Add('add');
end;

hResult:=Idhttp1.Post(aURL,Params);

If not ( pos('ok',hResult) = 0 ) then
 begin
   Showmessage('Text Added Successful');
   { ... usw ... }
 end
 else Showmessage('Fehler!');

params.free;
end;
PHP:

PHP Code:
<?php

if (isset($_GET['add'])) {

@mysql_connect(ip,user,pass) or die('Server Online ? Ports Frei?');
@mysql_select_db('test') or die('DB test nicht verfügbar?');
@mysql_query('INSERT INTO test (text) VALUES ("'.$_GET[text].'")') or die('Query Error ');

echo 'ok';

}

?>
so würde ich das machen mit Delphi (code nicht getestet bzw nur ein beispiel) bei vb kann ich dir nicht helfen.
04/26/2010 02:34 Atheuz#5
Quote:
Originally Posted by Nosferatu. View Post
WinSocks müsste es auch bei vb geben (bin aber net sicher)

Dabei Spielt dein Program den CLient, und schickt die daten die du eintragen möchtest zum Server, und dieser Server Trägt es dann für dich in die MYSQL DB ein :)

Oder mit hilfe PHP , Via POST(http) Method. Variablen zusammen setzen und der PHP übergeben.

zb:
Er benutzt VB2008, das heißt er hat die möglichkeit auf .NET zuzugreifen z.B HttpWebRequest.