Edit-Adoquery-Access DB

[poterp]

Hallo,
ich habe ein Editfeld (edt_zahl) und Access DB und ich möchte über dem Adoquery die Zahlen, die ich in der Editfeld angegeben habe in dem Access BD speichern.
weisst jemand wie es geht?
grüß
poter

[mkinzler]

SQL-Code:

Insert into <tabelle> where <Feld> = :wert;

Delphi-Quellcode:

AdoQuery.Parameters.ParamByName('wert').asString = Edit.Text;

[marabu]

Hi Markus,

eine kleine Korrektur:

SQL-Code:

INSERT INTO tabelle(feld) VALUES(wert)

Freundliche Grüße

[mkinzler]

Natürlich, war wohl etwas umnebelt.

[poterp]

Folgendes habe ich gemacht
1- Adoconnection1 zur Datenbank (erfolgreich)
2- Adoquery connection Adoconnection 1
3- Adoquery SQL (String):

Delphi-Quellcode:

Insert Into Tab_Insert where insert_nr =: Param_zahl;

Parameters:

Delphi-Quellcode:

Param_zahl

und Value auf '0'

auf mein Form habe ich ein Editfeld und einen Button und ich habe folgendes gemacht:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
Adoquery1.Parameters.ParamByName('Insert_nr').Value:= edit1.Text;
end;

aber ich bekomme folgendes als fehler: Adoquery1: Parameter insert_nr not.
***mein tabelle hat ein feld 'Insert_nr'
was mache ich den da falsch???
grüß
Poter

[mkinzler]

SQL-Code:

Insert Into Tab_Insert( insert_nr) values ( :insert_nr);

[poterp]

Es passiert nix

[marabu]

Hallo,

es passiert wirklich nicht viel, solange du die Methode ExecSQL nicht aufrufst:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
begin
  with Adoquery1 do
  begin
    SQL.Text := 'Insert Into Tab_Insert(insert_nr) values(:insert_nr)';
    Parameters.ParamByName('Insert_nr').Value := edit1.Text;
    ExecSQL;  // <-- essential!!
  end;
end;

Gute Nacht

[poterp]

Danke es funktioniert