Hente fra MySQL

<%= objrs("dit felts navn") %>

Delphi?

sorry... ttroede vi snakkede asp :o)

delphi.. aner det ikke ;o)

Du opretter forbindelse til MYSQL serveren eksempelvis ved hjælp af en
ADOConnection - Connectionstring. Dog skal du have installeret en ODBC driver til MySQL-serveren(Kan hentes på www.mysql.com) før du kan kontakte den.

Til denne connection tilknytter du din Query.

jhc: Den er jeg med på, og jeg kan sagtens komme til databasen - jeg skal bare have den rigtige Query...

Hvad ønsker du at din Query skal gøre slå op i usertabellen efter en given bruger eller hvordan.

Noget i den her stil du leder efter ?

query1.sql.clear;
query1.SQL.add('select * from users where id = :idparm');
query1.parambyname('idparm').asinteger := dinvar;
query1.open;

pbudk: yes - men jeg kender id i forvejen, så skal den give mig den data der står under feltet "pass"... Som når en bruger glemmer sit password, skal den kunne hente det igen fra databasen og vise det til brugeren

du vil altså have data ud af din query ?

password := Query1.fieldbyname('pass').asstring;

altså efter du har kørt de første linier jeg skrev

procedure TForm1.Button1Click(Sender: TObject);
begin
with ADOQuery1 do begin

with SQL do begin
Clear;
Add('SELECT * from uesers');
add('where id = :idparam');

ADOQuery1.Parameters.ParamByName('idparam').Value := edtbrugerid.Text;



end;
Open;
showmessage('Dit kodeord er ' + adoquery1.FieldValues['password']);

end;
end;

Stoney

Begge eksempler ender op i den siger "Query: 'list' not found"...
Men det gør den altså - den ligger som en "bigtext"

Har du rettet querynavn, tablenavn, feltnavn og lignende til ?

"Bigtext" er det et memo felt i din database.

Add('SELECT * from uesers'); skal være Add('SELECT * from users');


Stoney

Add('SELECT * from users where id = :idparam');
Query.ParamByName('idparam').Value := id;

List := Query.FieldValues['list'];

procedure TForm1.Button1Click(Sender: TObject);
begin
with ADOQuery1 do begin

with SQL do begin
Clear;
Add('SELECT * from users'); // users er tabelnavn
add('where id = :idparam'); // id er feltnavn

ADOQuery1.Parameters.ParamByName('idparam').Value := edtbrugerid.Text;



end;
Open;
showmessage('Dit kodeord er ' + adoquery1.FieldValues['password']); // feltnavn er password

end;
end;

skal list ikke være feltnavn på dit kodeord

Det skal virke.

Stoney

Jeg havde glemt en Open, Tak Stoney!