Saludos...
Trabajo en una tabla de Access 97 con VB6 quiero ejecutar el siguiente codigo:
Private Sub LIMPIARTABLA()
Dim BD As Database
Dim SQL As String
Set BD = OpenDatabase("C:\DNA\bd1.mdb", , False)
SQL = "DELETE * FROM dna WHERE ID = ''"
BD.Execute SQL
BD.Close
End Sub
Si el codigo lo ejecuto paso a paso funciona la sentencia SQL(SQL = "DELETE * FROM dna WHERE ID = ''"), pero si lo ejecuto continuamente esta ya no funciona.
Lo que necesito es que de la tabla DNA elimine todos los registros iguales a "" .
De antemano agradezco me ayuden a solucionar mi problema y falta de conocimiento.
Gracias.
