Cancellazzione record se data > 180 giorni

[styweb86]

salve a tutti avrei un piccolo problemino da porvi..

ho la necessità di eliminare tutti i record in un database la cui differenza fra la data di iserimento e la data attuale si maggiore di 180...

come potrei procedere??

ekko il codice ke ho elaborato ed ovviamente nn funziona


dim conn2
dim rs2

set conn2 = Server.CreateObject("ADODB.Connection")
Conn2.Open "Provider = Microsoft.Jet.OLEDB.4.0; Data Source=" & Server.MapPath("mdb-database/annunci.mdb")


sq2l="Delete * from annunci where data DATEDIFF(d,data,date())>180"
Set rs2=conn2.Execute(sql2)

conn2.Close

[antenio]

prova a fare cosi:

scorri la tab annunci
salvi il Id_Ann
salvi la data annuncio e la confronti
se datediff(d,data_annuncio,date())>180
---> Delete * FROM Annunci WHERE Id_Annuncio=Id_Ann

dovrebbe funzionare

[styweb86]

mi sa ke in questo modo non potrà mai funzionare!!

se apro una tabelle e la faccio scorrere fino alla sua fine,nel momento in cui elimino un record la fine non corrisponde +......

ci sono altre proposte??

[Wama]

per riportare il recordset all'inizio senza doverne creare un altro puoi fare
rs.MoveFirst

[styweb86]

ok ragazzi potete farmi un esempio

[Surrender79]

Secondo me potrebbe andare bene così:

SELECT * FROM Tabella
WHERE DataInserimento <= DATEDIFF("d", 180, DATE())

in questo modo gli dici di prendere tutti i record in cui la data di inserimento è inferiore a 180 giorni a partire dalla data di oggi...

fai prima la select così vedi se ti prende i risultati che vuoi, se poi va bene la trasformi in DELETE

[styweb86]

neanche questa soluzione è andata a buon fine!!

Chi sa veramente aiutarmi??

[Roby_72]

Che db usi?
Come hai memorizzato la data?

Roby

[br1]

Calcoli la data di 180 giorni fa e fai la query usando quella...

dateRif = dateadd("D",-180,Date())

dateDb="#"&month(dateRif)&"-"&day(dateRif)&"-"&year(dateRif)&"#"

sql = "delete from tabella where datainserimento<="&dateDb

ciao