Ver Mensaje Individual
  #2 (permalink)  
Antiguo 27/06/2007, 01:58
Avatar de Laforge
Laforge
 
Fecha de Ingreso: noviembre-2004
Ubicación: Galaxia 34, Cuadrante 972, Área 31
Mensajes: 174
Antigüedad: 20 años, 6 meses
Puntos: 2
Re: tablas de access y visual basic

Yo diría que eso es consulta de VB y no de BDD, pero bueno, algun moderador lo cambiará de situación si lo considera necesario....

abre la base de datos en cuestión (sea la que sea)
Dim Tabla, MiBd as DataBase
Set MiBd = OpenDatabase(basededatos,[parámetros])
For Each Tabla In MiBd.TableDefs
ComboBox.AddItem tabla.Name
Next

NOTA: Ojo con las tablas de 'sistema' (MSys) que está presente en todas las bases de datos de forma oculta(para MSAccess) y no te recomiento manipularla....if Left(Tabla.Name,4)<>"MSys" then ComboBox.AddItem Tabla.Name
__________________
Nunca esperes un mejor momento para abrir esa botella de vino...........nunca llega.

No hay vida después de MySQL

Última edición por Laforge; 27/06/2007 a las 01:59 Razón: error tipográfico