Tablas de Access 95
En un formulario tengo un botón para borrar una tabla y tengo que saber si la tabla existe o no. Que instrucción tengo que poner para que con una condición IF poder hacer una cosa u otra.
1 Respuesta
Respuesta de jrhen
1
==================
Sub prueba()
Dim Lista_Tablas As TableDef
Dim rst as RecordSet
'para cada tabla en la lista de tablas
For Each Lista_Tablas In CurrentDb.TableDefs
'preguntamos su nombre, si es "laquebuscamos"
If Lista_Tablas.Name = "laquebuscamos"
Then
'la borramos
DoCmd.RunSQL "DROP TABLE laquebuscamos"
Exit For
end if
Next
End Sub
===================
Espero que te sirva. Suerte.
Sub prueba()
Dim Lista_Tablas As TableDef
Dim rst as RecordSet
'para cada tabla en la lista de tablas
For Each Lista_Tablas In CurrentDb.TableDefs
'preguntamos su nombre, si es "laquebuscamos"
If Lista_Tablas.Name = "laquebuscamos"
Then
'la borramos
DoCmd.RunSQL "DROP TABLE laquebuscamos"
Exit For
end if
Next
End Sub
===================
Espero que te sirva. Suerte.
