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