record cancellati secondo voi questo codice è corretto?

[tosto73]

sql = "DELETE * FROM annunci WHERE datascadenza < #" & date() & "#"

deve cancellare solo i record che hanno datascadenza di tipo data inferiore a oggi.

il codice è inserito cosi

--- code ------

<%
dim annunci,contat,frase1
'elimino gli annunci vecchi
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("/dbase/annunci.mdb") & ";pwd=3333"

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

sql = "DELETE * FROM annunci WHERE datascadenza < #" & date() & "#"

objConn.Execute(sql)

sql = "SELECT * FROM annunci"
objRS.Open sql, objConn,1,3
annunci = objRS.recordcount

objRS.Close

'se diverso da 33 vuol dire che è la prima entrata deve contare
if session("conta")<>"33" then
sql = "SELECT * FROM visitatore"
objRS.Open sql, objConn,3,3
objRS("contatore")=objRS("contatore")+1
session("contat")=objRS("contatore")
objRS.update
objRS.Close
session("conta")="33"
end if

set objRS=nothing

objConn.Close
Set objConn = Nothing
frase1="Sei il visitatore n. " & session("contat") & " - Sono presenti " & annunci & " annunci."
%>

perchè mi mcancella anche record non più vecchi di oggi ?

:master:

[Roby_72]

Già lo hai aperto questo thread...

Roby

[tosto73]

ok! secondo te questo codice può cancellare record che non dovrebbe cancellare? vedendo anche il mio post precedente?

grazie in anticipo.

:quipy:

[riccardo_ge]

Prima di cancellare qualche cosa, selezionala.... nel senso che prima di fare una "DELETE" fai una "SELECT" in modo da farti stampare i record che andrebbe a cancellare.

Così potrai capire dove sbagli, se sbagli!!!!!!!!!!!

[tosto73]

ok provo grazie

[deleted_c]

no!
la data sempre in formato mm/dd/yyyy