Autor Tema: Re: Como eliminar todos los registros de una tabla? (Leído 2861 veces)

kail · « **en:** Jueves 21 de Noviembre de 2002, 13:18 »

Hola

Soy yo otra vez abusando de su buena voluntad, necesito eliminar todos los registros de una tabla de una base de datos access y no se como hacerlo, espero que alguien me pueda ayudar.

Gracias de antemano por sus consejos.

Macarena

Gago

Prueba con ejejutar desde una conexión ADODB una sql:

Conexión.Execute "drop [nombre de tabla]"
Pero esto borra la tabla entera, estructura y todo. Así que prueba con copias de seguridad, no estoy seguro de que te funcione, pero pruba, a ver si suena la flauta...

jlmartinez

Hola. Para eliminar todos los registros de una tabla solo tienes que ejecutar una consulta de eliminación en una conexión abierta a la BD:

Conexion.Execute "Delete * from Tabla"

Tabla = Nombre que tiene tu tabla en la BD
Conexion = Objecto Connection si trabajas con conexion Ado

Si tienes alguna duda sobre el modo Execute desde DAO/ADO puedes mirarlo en la documentación de access.

Un saludo

kail

Hola

Muchas gracias a JMartinez por la solución que me dio funciona perfectamente.

Jrtuarez

debes acer una conexxion tipo ado algo asi:

Dim base As New ADODB.Connection
Dim tabla As ADODB.Recordset

Private Sub Elimina_Click()
'command
'base.Execute "delete from Tabla" ' elimina registros
base.Execute "drop table Tabla" 'elimina tabla
End Sub

Private Sub Form_Load()
base.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:Documents and Settingslab1-3Mis documentosejemplo.mdb;Persist Security Info=False"

End Sub

Private Sub Form_Unload(Cancel As Integer)
base.Close
End Sub