Jetzt wirds schon besser, wieder einen Schritt weiter.
Nun noch ein paar Flüchtigkeitsfehler beseitigen und dann geht es schon.
Delphi-Quellcode:
AktMonat:=DM.AdsQBelege.FieldByName('BelegDatum').AsDate;
.
.
.
StartMonat:=StartOfTheMonth(AktMonat);
EndMonat:=EndOfTheMonth(AktMonat);
DM.AdsQBelege.SQL.ADD('Update Belege Set Exportiert = :ExportDatum' +
' Where Exportiert is null AND Belegdatum Between :MonatsAnfang and :MonatsEnde');
DM.AdsQBelege.ParamByName('ExportDatum').AsDateTime := Now();
DM.AdsQBelege.ParamByName('MonatsAnfang').AsDate := StartMonat;
DM.AdsQBelege.ParamByName('MonatsEnde').AsDate := EndMonat;
DM.AdsQBelege.ExecSQL;
So funktioniert das jetzt.
Hat noch jemand was daran auszusetzen, dass es nur unter bestimmten Bedingungen laufen kann oder dass noch Exceptions abgefangen werden müssen oder sonst was, das ich als begeisterter, wissbegieriger
SQL-Schüler wissen sollte ?