Hi,
Ich versuche ein Loginscript zu realisieren, es gibt 2 input felder, eins heißt username das andere Password und dann noch einen Login button, nun hab ich in der datenbank die spalten username und password, diese möchte ich mit der eingabe vergleichen und wenns ne übereinstimmung gibt will ich erstmal nur ne showmessage anzeigen lassen, dass die daten korrekt sind, ich komm leider nicht wirklich weiter, hier ist mal mein ansatz:
Delphi-Quellcode:
Con := mysql_init(
nil);
if Assigned(Con)
then
try
if Assigned(mysql_real_connect(Con, host, user, pass,
db, 3306,
nil, 0))
then
begin
query := '
SELECT username,password FROM user WHERE username = '+username.Text+ '
AND password = '+password.text;
mysql_real_query(Con,PChar(
query), Length(
query));
if Assigned(Res)
then
begin
Res := mysql_store_result(Con);
if (mysql_num_rows(Res) =1)
then showmessage('
Daten Korrekt');
if (mysql_num_rows(Res) <>1)
then showmessage('
Daten Falsch');
end;
end
finally
mysql_close(Con);
end;