Skriv til MySQL database

Hej duez.
Jeg bruger ODBC (findes på mysql.com) og kører gennem ADO for at gøre det. Hvis f.eks. du har oprettet forbindelse gennem adoconnect kan du gøre det hele ved hjælp af SQL kommandoer:

Eksempel på læsning:
adosql er en adoquery
adoconnection1 er forbindelsen til databasen


  adosql.connection := adoconnection1;
  if adosql.active then
    adosql.Close;
  ADOsql.SQL.Clear;
  ADOsql.SQL.Add('select kon_id from kontoplan');
  ADOsql.SQL.Add('order by kon_id');
  ADOsql.Open;
  while not ADOsql.Eof do begin
    listbox1.items.add(ADOsql.fieldbyname('kon_id').AsString);
    ADOsql.Next;
  end;
  ADOsql.Close;

Eksempel på indsæt:

  adosql.connection := adoconnection1;
  if adosql.active then
    adosql.Close;
  ADOsql.SQL.Clear;
  ADOsql.SQL.Add('select * from kontoplan');
  ADOsql.Open;
  adosql.insert; // ell. adosql.edit hvis den findes
  ADOsql.fieldbyname('kon_id').AsString:='TEST';
  ADOsql.post;
  ADOsql.Close;

venligst Ib

Har fundet ud af noget selv!
overstående eksempel kunne jeg alligevel ikke få til at umedbart at virke!

Ellers tak for forsøget