Acceso a tablas de base de datos Access
Hola que tal. Mi pregunta es, que código necesito desde visual basic 6 para preguntar a una base de datos de access con nombre concreto, si existe una tabla con un nombre concreto, devolviéndome un valor boolean. Gracias.
Respuesta de juancito39
1
Con el objeto tabledefs puedes averiguar información de las tablas en una base de datos, acá te coloco un ejemplo:
Dim DbMibase as Database
Dim Bucle As Integer
Dim tot_tablas as Integer
With DbMibase
Tot_tablas = .TableDefs.Count
For Bucle = 0 To tot_tablas - 1
Nombre_tabla= .TableDefs(Bucle).Name
Next Bucle
end with
En este ejemplo tot_tablas es el numero total de tablas de la base de datos, DbMibase es el nombre de tu base de datos y Nombre_tabla es el nombre de la tabla en un momento dado del bucle, solo tienes que comparar Nombre_tabla con el nombre de la tabla que andas buscando y si es igual colocar una variable boolean a true.
Dim DbMibase as Database
Dim Bucle As Integer
Dim tot_tablas as Integer
With DbMibase
Tot_tablas = .TableDefs.Count
For Bucle = 0 To tot_tablas - 1
Nombre_tabla= .TableDefs(Bucle).Name
Next Bucle
end with
En este ejemplo tot_tablas es el numero total de tablas de la base de datos, DbMibase es el nombre de tu base de datos y Nombre_tabla es el nombre de la tabla en un momento dado del bucle, solo tienes que comparar Nombre_tabla con el nombre de la tabla que andas buscando y si es igual colocar una variable boolean a true.
