SoloCodigo
Programación General => Visual Basic 6.0 e inferiores => Mensaje iniciado por: MindEye en Viernes 11 de Abril de 2003, 10:47
-
- Me gustraría saber como puedo borrar una tabla de acces, desde el mismo acces, me eplico, estoy intentando crear una aplicacion para hacer tablas con sus campos desde acces, pero no consiguo que me borre las tablas, por ejemplo, tengo una tabla que he creado que se llama Pedidos, pero ya no me vale, y me la quiero cargar, o sea, la quiero borrar, para luego, volverla a crear, claro que esto lo quiero hacer en un formulario, pero no me sale.
- Gracias.
-
Según planteas la pregunta parece que quieres saber cómo borrar una tabla desde el mismo Acces, lo cual es tan simple como seleccionar la tabla y pulsar la tecla [Supr] o [Del].
Como no creo que sea eso lo que te crea dificultad, interpreto que quieras decir borrar la tabla desde Visual Basic. Si fuera así, te adjunto el ejemplo que proporciona el MSDN de Visual, del que posiblemente no dispongas:
Sub TableDefX()
Dim dbsNeptuno As Database
Dim tdfNuevo As TableDef
Dim tdfBucle As TableDef
Dim prpBucle As Property
Set dbsNeptuno = OpenDatabase "Neptuno.mdb")
' Crea un objeto TableDef nuevo, anexa los objetos
' Field a la colección Fields y anexa el objeto
' TableDef a la colección TableDefs del objeto Database.
Set tdfNuevo = dbsNeptuno.CreateTableDef("NuevoTableDef")
tdfNuevo.Fields.Append tdfNuevo.CreateField("Fecha", dbDate)
dbsNeptuno.TableDefs.Append tdfNuevo
With dbsNeptuno
Debug.Print .TableDefs.Count & _
"TableDefs en " & .Name
' Enumera la colección TableDefs.
For Each tdfBucle In .TableDefs
Debug.Print " " & tdfBucle.Name
Next tdfBucle
With tdfNuevo
Debug.Print "Propiedades de " & .Name
' Enumera la colección Properties del objeto
' TableDef nuevo, sólo imprime las propiedades con valores no vacíos.
For Each prpBucle In .Properties
Debug.Print " " & prpBucle.Name & " - " & _
IIf(prpBucle = "", "[vacío]", prpBucle)
Next prpBucle
End With
' Elimina el TableDef nuevo ya que esto es un ejemplo.
.TableDefs.Delete tdfNuevo.Name
.Close
End With
End Sub
Y si tampoco es esto, pues... ya dirás...
Saludos y suerte
-
- Lo que quiero es poder borrar las tablas desde el mismo acces, pero no se como es, me lo podrias explicar.
Gracias.
-
Efectivamente, eso era lo que tú decías; pero ya te digo al inicio de mi respuesta anterior, que eso es tan simple como seleccionar la tabla que quieras borrar y pulsar la tecla [Supr] o [Del]. Te pregunta si estás seguro de eliminar esa tabla...
¿Qués es lo que te pasa? ¿Que no te permite esa opción? ¿No será que tienes confeccionada la tabla con Access 2000 y quieres anularla con Access 97?
Si es eso lo que te ocurre, cierra el fichero y ejecuta en Herramientas, Utilidades de la base de datos, Convertir base de datos, A la versión de Access actual... Seleccionas la base de datos que quieras modificar y le das el nombre que te presenta por defecto "db1". Abre ese fichero db1 y AHORA YA PUEDES ELIMINAR LAS TABLAS QUE NECESITES.
Luego tendrás que ejecutar el procedimiento contrario: Herramientas, Utilidades de la base de datos, Convertir base de datos, A una versión anterior de Access... Le das el nombre de "db2" y luego renombras este db2 al nombre de tu base de datos.
Supongo que haya quedado claro todo. Porque ¡sólo me faltaba que tampoco fuera éste el problema que tienes!!! En tal caso, explicotéate bien... porque me tienes jugando a las adivinanzas...
Saludos y suerte