Automatisk sletning af dato

Jeg bruger Access-database, har søgt på eksperten men fik ikke rigtig noget ud af det...

DELETE FROM tblKalender WHERE KalenderDato >= #" & date & "#" 

eller > eller < eller <= ... hvad du nu mener

Nu ser min streng således ud
"Delete from tblKalender where KalenderDato <= #" & date & "#"

Men så bliver alle records slettet.

Feltet KalenderDato bestå af datoer i formatet dd-mm-åååå og VBscripts date skulle også være i samme format

Jeg kører LCID = 1030

Datoer i ASP/Access er altid noget rod. Men den skulle
dog ikke slette alle. Mener du at den sletter fremtidige
datoer også? Jeg tror umiddelbart du skal
bruge < i stedet for <= så du ikke får dagens datoer slettet.

jeg tror at den bytter om på dato og måned

Det er det klassiske problem dd/mm og mm/dd ...

Du skal blot afvise mit svar - der er ingen grund
til at jeg også får mavesår af Microsofts produkter

hehe ok

ok - har lige udskrevet VBs date og den gi'r dd-mm-åååå - så det skulle være ok, men hvad er der så galt?

SQL bruger US/UK dato format så det er mm-dd-åååå eller åååå-mm-dd og dermed vil den bytte rundt på dd og mm hvis du bruger server med dansk dato format. Du kan dog bruges Date functionen som findes i Access, og så kun mindre end (<) ikke = da datoer idag så vil blive slettet:


SQL = "DELETE FROM tblKalender WHERE KalenderDato < Date()"

Hvis du vil overføre din egen dato via SQL skal du konvereter DK format til yyyy-mm-dd og det kan gøres med year,month og day functionerne:

datoStr = Year(Date) & "-" & Month(Date) & "-" & Day(Date)

SQL = "DELETE FROM tblKalender WHERE KalenderDato < #" & datoStr & "#"

Det var jo simplere end jeg havde regnet med. Tak