larva
21 de Abril del 2004

tengo una aplicacion en access y vba con tablas vinculadas desde mysql, necesito borrar todos los registros de una tabla. el codigo que habia es:
Set tabla = db.OpenRecordset("tabla")
If Not tabla.EOF Then
Do Until tabla.EOF
tabla.Delete
tabla.MoveNext
Loop
End If

y quiero cambiarlo por solo una sentencia, e probado con:

Set db = CurrentDb()

solucion 1
querydel = "delete * from tabla"
CurrentDb.Execute querydel

solucion 2
querydel = "delete * from tabla"
DoCmd.RunSQL (querydel)

solucion 3
Set rs = CurrentDb.OpenRecordset("select * from tabla")
rs.Delete

y no borra de ninguna forma.

una solucion quiero!!! muchas gracias