Ver Mensaje Individual
  #4 (permalink)  
Antiguo 06/02/2007, 07:48
jorevale
Invitado
 
Mensajes: n/a
Puntos:
De acuerdo Ya lo conseguí...



Gracias Tazzito, pero el asunto es que lo que yo le estoy pasando como variable a las instrucciones SQL es el nombre del campo.

Lo que hice fue construir la variable antes de pasarsela al Recordsource del ADO, y luego le paso a éste la cadena previamente construida, o sea:

Cadena_SUM = "select SUM(CSI),SUM(CCI),SUM(GEMP),SUM(GTEC),SUM(CAJA),SU M(EMP),SUM(TEC),SUM(TAL),SUM(TEMP),COUNT(EMP)," & XSel_3_1 & " from AVISOS group by " & XSel_3_1
Cadena_Gráfico = "select " & XSel_3_1 & ",SUM(TEMP) from AVISOS group by " & XSel_3_1
Cadena_Cuenta = "select " & XSel_3_1 & ",COUNT(EMP) from AVISOS group by " & XSel_3_1

'Hasta aqui hemos construido tres cadenas en las que ponemos el nombre de un campo desde una variable: XSel_3_1, y ahora se la pasamos al ADO

Select Case XSel_3_1
Case Is = "OPE"
.Adodc_Est.RecordSource = "select * from AVISOS order by AVI"
.Adodc_SUM.RecordSource = Cadena_SUM
.Adodc_Gráfico.RecordSource = Cadena_Gráfico
.Adodc_Cuenta.RecordSource = Cadena_Cuenta