provi a scrivere
Se non funziona ancora provi di sostituire ADO con DAOcodice:Dim db As ADO.Database dim SQL as string Set db = OpenDatabase("pathDelTuoDatabase.mdb") SQL="DELETE * FROM tabella WHERE campo=1" db.Execute SQL db.close
provi a scrivere
Se non funziona ancora provi di sostituire ADO con DAOcodice:Dim db As ADO.Database dim SQL as string Set db = OpenDatabase("pathDelTuoDatabase.mdb") SQL="DELETE * FROM tabella WHERE campo=1" db.Execute SQL db.close