Visual Basic - Obtener nombres de tablas de una BD

Life is soft - evento anual de software empresarial
 
Vista:

Obtener nombres de tablas de una BD

Publicado por Carlos (3 intervenciones) el 25/07/2006 16:27:01
Hola Amigos:
Necesito cargar un combobox con los NOMBRES de las tablas que estan contenidas dentro de una BD ACCESS, cuyo nombre y path obtengo desde un textbox.
La conexión ya la tengo realizada, solo me falta obtener dichos nombres para luego realizar los SELECT correspondientes.
Muchas gracias por la ayuda.
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:Obtener nombres de tablas de una BD

Publicado por Cecilia Colalongo (3116 intervenciones) el 25/07/2006 18:50:16
Fijate con:

Dim rst As Recordset

Set rst = ObjetoConnection.OpenSchema(adSchemaTables)

Y fijate que contiene ese recordset.
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:Obtener nombres de tablas de una BD

Publicado por Carlos (3 intervenciones) el 26/07/2006 21:43:38
Cecilia:
Muchas gracias por tu aporte, fue de gran utilidad.
Por si hay otros que necesitan lo mismo, les paso el procedimiento completo para cargar el combo:

Sub CargoTablas()
Dim rst As ADODB.Recordset
Set rst = cnPOS.OpenSchema(adSchemaTables)
rst.MoveFirst

Do Until rst.EOF

If rst!TABLE_TYPE = "TABLE" Then
cboTabla.AddItem rst!TABLE_NAME
End If

rst.MoveNext
Loop
rst.Close
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