tengo una base de datos en Access2000 y deseo hacer un listado de las tablas que contenga. sin conocer la cantidad ni el nombre de las tablas.
hay alguna manera de lograr esto?? :huh:
agredezco cualquier sugerencia
habia una manera de hacerlo con un for Each pero no me acuerdo como, pero esta podría ser otra solución:
Dim bd As Database
Dim i As Integer
Set bd = Workspaces(0).OpenDatabase("C:\..\bd01.mdb")
On Local Error Resume Next
While Err.Number = 0
MsgBox bd.TableDefs(i).Name
i = i + 1
Wend
On Local Error GoTo 0
bd.Close
jejeje, ya me salio lo del For Each, jejeje ;D
Dim bd As Database
Dim Tabla As TableDef
Set bd = OpenDatabase("C:\...\bd.mdb")
For Each Tabla In bd.TableDefs
If Tabla.Attributes = 0 Then MsgBox Tabla.name
Next
bd.Close
Set bd = Nothing
espero y sea lo que estas buscando... saludos y Feliz navidad
siiiii. muchas gracias...
estuve probando de muchas formas
pero con conexion ADODB
voy a ver si puedo adaptar el codigo!!