Zitat von
Avax2k:
...
Variante 2 ist so:
Delphi-Quellcode:
const SQL_COPY1
= 'INSERT INTO PROFIL(Datum)'
+'SELECT *, %s FROM PROFIL'
+'WHERE BenutzerID = :ID';
...
ADODataSet.Close;
ADODataSet.FieldValues['BenutzerID'] := Label1.Caption;
ADODataSet.CommandText := Format(SQL_COPY1, [DateToStr(Date)]);
ADODataSet.Open;
...
hier meldet Delphi, dass AdoDataSet kein Feld mit der Bezeichnung BenutzerID hat... das stimmt aber nicht denn es ist definitiv da und funktioniert auch in einer anderen Funktion tadellos... weiss nicht woran es liegt..
benutze
Delphi-Quellcode:
// ...
ADODataSet.FieldByName( 'BenutzerID' ) := Label1.Caption;
// ...
Oder Füge das Feld 'BenutzerID' in die Fieldliste vom ADODataSet.
Bye Christian