Vorrei cancellare tutti i campi di una tabella se il primo valore che incontra nel campo data è la data di oggi.

codice:
dim data
data=date()

TabellaIndirizziIP.open

if(data<>rs.fields("Data"))then
delete from TabellaIndirizziIP
end if
Perchè mi dà "expected end of statement" sul delete?