Visual Basic - borrar contenido de una tabla de la bd

Life is soft - evento anual de software empresarial
 
Vista:

borrar contenido de una tabla de la bd

Publicado por fatima (2 intervenciones) el 07/10/2004 20:11:14
saludos,

Sabrias la codificacion para borrar el contenido de una tabla de una base de datos access. No para borrar la tabla ni los campos de la tabla sino el "contenido" de la tabla

muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:borrar contenido de una tabla de la bd

Publicado por miguel (1042 intervenciones) el 07/10/2004 20:56:12
Con la instruccion Delete
"Delete From Tabla"
Elimina toda la informacion pero mantiene la estructura, (por si lo ocupas) si quiere eliminarla por completo utiliza el
"Drop Table Tabla"
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:borrar contenido de una tabla de la bd

Publicado por fatima (2 intervenciones) el 08/10/2004 03:50:55
disculpa, pero no te entiendo, exactamente donde se indica esta sintaxis, dentro de una sql? seteando (set) la variable relacianda a esta tabla?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:borrar contenido de una tabla de la bd

Publicado por miguel (1042 intervenciones) el 08/10/2004 16:56:54
Bueno, te lo voy hacer un ejemplo completo, como no se, como te estas conectando te pongo la conexion por Ado, para que funciones por Ado debes Activar la Referencia "Microsoft ActivexX Data Objects 2.0 Library " o la version que tengas.
Dim sql As String
Dim cnbase As ADODB.Connection
Private Sub Form_Load()
Conectar
End Sub
Sub Conectar()
On Error GoTo Errores
Dim Ruta As String
Dim NomBase As String
NomBase = "BaseDatos.mdb" 'Nombre de la BD de ACCESS
Ruta = App.Path & "\" & NomBase 'Direccion donde se encuentra tu BD de ACCESS
Conexion = "Provider=Microsoft.Jet.OLEDB.4.0;Persist Security Info=False;Data Source=" & Ruta & ""
Set cnbase = New ADODB.Connection
cnbase.ConnectionString = Conexion
cnbase.Open Conexion
Errores:
If Err.Number <> 0 Then Errores
End Sub
Sub Errores()
Msg = "Error Ocasionado Por:" + Chr(13) + Err.Description
MsgBox Msg, vbCritical, "Error" + Str(Err.Number)
Err.Clear
End Sub
Private Sub cmdEliminar_Click() 'Aqui eliminas el contenido
sql = "Delete * From TuTabla"
cnbase.Execute sql
End Sub

Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar