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.
![]()
![]()

Rispondi quotando