Registriert seit: 17. Sep 2006
Ort: Barchfeld
27.625 Beiträge
Delphi 12 Athens
|
Re: ADO SQL UPDATE
7. Mai 2009, 17:46
Und so?
Delphi-Quellcode:
ADOQuery1.SQL.Text := 'UPDATE Profil SET Anrede = :geschlecht,'+
'Vorname = :vorname,'+
'Nachname = :nachname,'+
'Alter = :birthday,'+
'Strasse = :strasse WHERE Profil_ID = :id';
ADOQuery1.Parameters.ParamByName('geschlecht').Value := geschlecht;
ADOQuery1.Parameters.ParamByName('vorname').Value := vorname.Text;
ADOQuery1.Parameters.ParamByName('nachname').Value := nachname.Text;
ADOQuery1.Parameters.ParamByName('birthday').Value := birthday;
ADOQuery1.Parameters.ParamByName('strasse').Value := strasse.Text;
ADOQuery1.Parameters.ParamByName('id').Value := main_win.profil_ID;
ADOQuery1.ExecSQL;
Detlef "Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
|