La Web del Programador: Comunidad de Programadores
 
    Pregunta:  1089 - DETERMINAR EL NOMBRE DE LOS CAMPOS DE UNA TABLA
Autor:  Felix Fuenpe
¿como puedo conseguir los nombres de capos de las tablas a las que entro?
Estoy haciendo una busqueda en muchisimas tablas, accedo a ellas, consigo el numero de campos de cada una de ellas pero me kedo en lo fundamental, como no se si dicha tabla contiene el campo ke necesito la sentencia SQL ke genero me produce un error, el cual podria resolverlo si no accedo a la consulta al no tener la tabla dicho campo, dios mio ke rollo os estoy soltando ;)
La verdad ke tampoko se si estoy haciendo bien generando instrucciones SQL, en fin ke soy un mar de dudas ;)
Gracias

  Respuesta:  Santiago Pastor
El siguiente ejemplo muestra los nombres de los campos de la tabla "Authors" de la base de datos MS Access "biblio.mdb" que viene como ejemplo.
Dim mibd As Database
Dim mitd As TableDef
Dim a As Integer

´ Abrimos la base de datos de Ms Access
Set mibd = OpenDatabase("c:\biblio.mdb")

Set mitd = mibd.TableDefs("Authors")

´ Mostramos los nombres de los campos
For a = 0 To mitd.Fields.Count - 1
MsgBox mitd.Fields(a).Name
Next a