[Delphi] SQL-query geeft error

[Dirickteur]

Hoi allemaal

Ik ben sinds vandaag eens begonnen met Borland Delphi om een simpel programmatje te maken dat een Access-database uitleest en soms iets moet toevoegen. De koppeling met de Access-database gaat allemaal prima, echter ik krijg de volgende foutmelding als ik een query run:

"Project Project1.exe raised exception class EOleException with message "De huidige voorziening ondersteunt het retourneren van meerdere recordsets van één uitvoering niet". Process stopped. Use Step or Run to continue."

Het gaat om de volgende query:

code:

procedure TForm1.Button1Click(Sender: TObject);
begin
with ADOQuery1 do begin
  Close;
  SQL.Text := 'INSERT INTO `tabel` (`naam`, `nummer`) VALUES ("hoi","hoi")';
  Open;
end;

Volgens mij mag de ADOConnection lezen en schrijven, de tabel/columnamen zijn goed, (allebei ook ingesteld als tekst, anders krijg je trouwens een andere foutmelding).

Weet iemand wat dit kan zijn?

Bedankt!

Update: Hoe krijg ik de resultaten van een Query in bijvoorbeeld een ListBox?:
[rml]Fiat Power in "[ Delphi] SQL-query geeft error"[/rml]

[ Voor 20% gewijzigd door Dirickteur op 18-04-2005 00:20 ]

[ludo]

Hmm Delphi is niet mijn favoriete werkgebied maar volgens mij komt het doordat je probeert van een INSERT query reultsets op te halen (en die zijn er logischerwijs niet). Ik denk dat je i.p.v. Open, ExecSQL o.i.d. moet proberen.

[ Voor 9% gewijzigd door ludo op 17-04-2005 21:26 ]

[LordLarry]

Ludo, je hebt helemaal gelijk.

[whoami]

Je moet idd ExecSQL uitvoeren om een INSERT, UPDATE of DELETE query uit te voeren.

Echter, dan nog denk ik dat die query niet zal lukken, omdat je die backticks gebruikt, en volgens mij is dit iets specifieks voor MySQL.
Jij gebruikt Access, dus, ofwel laat je die backticks weg, ofwel vervang je ze door blok-haken ([ ] ).

code:

SQL.Text = 'INSERT INTO [tabel] ([naam], [nummer]) VALUES ("hoi", 3)';

_{Ik ga er hier wel van uit dat het data-type van de column 'nummer', numeriek is.}

[ Voor 5% gewijzigd door whoami op 17-04-2005 21:55 ]

[Dirickteur]

Die 'backticks' maken niet uit, hij herkent namelijk wel gewoon de kolommen. Nummer is overigens de titel van een liedje en de naam is de artiest. Misschien niet zo handig gekozen, maar wel even snel gedaan...

En die ExecSQL werkt.. super en allemaal bedankt voor het meedenken.

[Dirickteur]

Zoals ook al in de TS ge-edit:
Hoe krijg ik nu data gefetched in bijvoorbeeld een ListBox?

[ Voor 3% gewijzigd door Dirickteur op 18-04-2005 00:21 ]

[NMe]

Door gewoon door je recordset heen te loopen en vervolgens alle elementen een voor een in een listbox te zetten? Wat heb je zelf al geprobeerd? En wat heb je gevonden? Waarom voldeed dat niet?

Beetje meer eigen inzet mag wel.

[LordLarry]

En als je een TDataSource en een TDBGrid gebruikt hoef je niet eens meer code daarvoor te schrijven.