• Jueves 30 de Mayo de 2024, 01:59

Autor Tema:  Sentencia Sql  (Leído 1720 veces)

dna9000

  • Nuevo Miembro
  • *
  • Mensajes: 1
    • Ver Perfil
Sentencia Sql
« en: Jueves 17 de Mayo de 2007, 01:17 »
0
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. :comp: