Error con Recordset en tiempo de ejecucion VB6

[lokoman]

Hola!!
Creo que le faltan parámetros al query:

• No tienes GROUP BY (ya que usas la funcion SUM)
• No tienes la clausula WHERE (para fltrar los datos)

Nunca he usado los parametros WHEN... THEN... ELSE... END en un query... veo que cierras un parentesis en la linea del END, pero no lo abres...