cambiar nombre de campo desde adodc

way2park · #1 (**permalink**) 23/04/2011, 13:46

Hola gente !!

Le cuento

Tengo un formulario con 6 campos.
Necesito que el usuario pueda configurarlos antes de comenzar a usar el programa
y para esto necesito que se pueda cambiar el "nombre" del campo por el nombre que quiera el usuario.

Viendo por ahi encontre el ALTER TABLE

Pero no tengo idea de como usarlo.
Puedo leer el nombre del campo usando

Adodc.Recordset.Fields(7).Name , pero me tira que es solo lectura y no puedo modificarlos.

como puedo solucionarlo???
Alguna idea !!!
Se agradece de antemano !!

lokoman · #2 (**permalink**) 25/04/2011, 10:44

Hola!!
Lo que se me ocurre es lo siguiente:

• Hacer un alias para cada campo y guardarlo en un archivo .ini
• El programa debe leer ese archivo .ini al formatear los resultados de tus querys

Ejem.:

CAMPO_________ALIAS

Campo 1 | Codigo
Campo 2 | Usuario
Campo 3 | Nombre
Campo 4 | Apellido
Campo 5 | Edad
Campo 6 | Peso

Tu select quedaria asi:

Código vb:

Ver originalIf INDEX=6 THEN
   strSelect="SELECT " & Adodc.Recordset.Fields(6).Name " AS " & LEER_INI("CAMPO", "CAMPO 6", "") & " FROM TABLA"
End If