Jimbo
15 de Diciembre del 2004

Hola, ¿alguien sabe cómo puedo hacer para listar todas las tablas que contiene una Base de Datos de access? Tan solo necesitaría conseguir el nombre de las tablas y tenerlas guardadas en un recordSet o algo así para poder recorrerlo.

Gracias

rafa
15 de Diciembre del 2004

Hola:
En access existe una tabla de sistema "MSysObjects" en la que aparecen los nombres de las tablas, consultas.....
en esta tabla hay un campo "TYPE" que te indica si es tabla(1), tabla vinculada(4), consulta(5)... Debes tener en cuanta q tb te muestra las tablas de systema, pero te servira.
Esta tabla esta oculta. En herramientas/opciones marca mostrar objetos ocultos y objetos de sistema.
Suerte

sdemingo
15 de Diciembre del 2004

Ya me lo he currao un poquillo:

Private Sub Form_Load()
Dim itmX As ListItem
Dim rs As New ADODB.Recordset

ListView1.ColumnHeaders.Add , , "Nombre de la Tabla", ListView1.Width
ListView1.View = lvwReport

Set rs = oConexion.OpenSchema(adSchemaTables)
Do Until rs.EOF
Set itmX = ListView1.ListItems.Add(, , rs("TABLE_NAME"))
rs.MoveNext
Loop
rs.Close

End Sub

A parte del nombre de las tablas me devuelve historias de sistema que no me hacen falta.

Necesito ayuda. Solo quiero los nombres de las tablas!!!!

Gracias

rafa
15 de Diciembre del 2004

creo que todo lo del sistema empieza por sys. Si es asi filtralo, o no lo añadas al lw

sdemingo
15 de Diciembre del 2004

Ok, empiezan con Msys

Gracias for all