cancellazione record da un db di access secondo criterio data

[tosto73]

vorrei eliminare i record più vecchi di un mese presenti nel mio db.
i valori datascadenza di alcuni record sono i seguenti:

13/06/2004
15/06/2004
07/07/2004
08/07/2004 ecc...

ho provato oggi 3 agosto 2004 a eseguire un response.write DATE ed ho ottenuto 8/3/2004 quindi pare che il sistema abbia giorno e mese invertiti rispetto ad access quindi ho pensato di invertire giorno e mese cosi:

- code -----------------------------
dim dataitaliana, giorno, mese, anno
giorno=datepart("d",date)
mese=datepart("m",date)
anno=datepart("yyyy",date)
dataitaliana=giorno & "/" & mese & "/" & anno

e poi quindi eseguire questo codice
- code -----------------------------
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/dbase/miodb.mdb") & ";pwd=1234"

set objRS=server.createObject("ADODB.Recordset")

sql = "DELETE * FROM annunci WHERE datascadenza < #" & dataitaliana & "#"

objConn.Execute(sql)
objRS.Close

set objRS=nothing

objConn.Close
Set objConn = Nothing
- end code -----------------------------

secondo voi è corretto? oppure è meglio invertire giorno e mese di ogni data dei record e non quella di sistema? Grazie a tutti.

[Cream]

non ho controllato il codice ma come principio è giusto :|