Query uitvoeren met de BDE van Delphi .....

Thread View: be.comp.programming

3 messages

[T] Back to Threads [V] Tree View [G] Group Articles

3 total messages Started by JVB Sat, 13 Dec 2003 10:04

#3477

Author: JVB
Date: Sat, 13 Dec 2003 10:04

31 lines
2203 bytes


Hallo, ik heb volgend probleem : als ik een record wil posten in een dbf
tabel via een query doe ik dit op volgende manier zoals onderstaand
voorbeeld :

With Query1 do
     begin
          Sql.Clear;
          Sql.Add('Insert Into Adressen(Naam)');
          Sql.Add('Values(:Naam)');
          Params[0].Value := 'Piet Jansen';
          ExecSQL;
     end;

Dit werkt overigens perfect. De veldnaam "naam" is van het type "string" .
Als ik nu een "integer" veld toevoeg , bijvoorbeeld "klantnummer" loop het
mis , ik voer volgende code uit en krijg steeds de melding "type mismatch in
expression"

With Query1 do
     begin
          Sql.Clear;
          Sql.Add('Insert Into Adressen(Naam,Klantnummer)');
          Sql.Add('Values(:Naam,:Klantnummer)');
          Params[0].Value := 'Piet Jansen';
          Params[1].Value := 1234;
          ExecSQL;
     end;

Vraag is dus : wat doe ik mis ?   Dank voor jullie hulp ........

Re: Query uitvoeren met de BDE van Delphi .....

#3396

Author: Kris De Decker http://www.jerboa...
Date: Mon, 15 Dec 2003 03:41

25 lines
1921 bytes

> Dit werkt overigens perfect. De veldnaam "naam" is van het type "string" .
> Als ik nu een "integer" veld toevoeg , bijvoorbeeld "klantnummer" loop het
> mis , ik voer volgende code uit en krijg steeds de melding "type mismatch in
> expression"
> 
> With Query1 do
>      begin
>           Sql.Clear;
>           Sql.Add('Insert Into Adressen(Naam,Klantnummer)');
>           Sql.Add('Values(:Naam,:Klantnummer)');
>           Params[0].Value := 'Piet Jansen';
            Params[1].DataType := ftInteger; //can also be set in object ins
            Params[1].AsInteger := 1234;  //Params[1].Value := 1234 
>           ExecSQL;
>      end;
> 
> Vraag is dus : wat doe ik mis ?   Dank voor jullie hulp ........
Werk het met de toegevoegde lijnen?

mvg,

Kris De Decker
______________ 
ps: cruciale bedrijfsinformatie in een overzichtelijk formaat >>
http://www.jerboa.be/blog/Articles/Nytro/infosheets.html

Re: Query uitvoeren met de BDE van Delphi .....

#3398

Author: JVB
Date: Mon, 15 Dec 2003 11:20

5 lines
1431 bytes

Ondertussen heb ik de oplossing gevonden :

Params[1].AsInteger := 1234 moet zijn : Params[1].AsFloat := 1234

> mvg,    Jan

Thread Navigation

This is a paginated view of messages in the thread with full content displayed inline.

Messages are displayed in chronological order, with the original post highlighted in green.

Use pagination controls to navigate through all messages in large threads.

Back to All Threads