Que le pasa a esta SQL?

[El Jedi]

Amigos, necesito ayuda con este código, a continuación posteo el código y el error que me tira:

Lo que yo quiero hacer es que sume un campo determinado entre tal fecha y tal fecha (la fecha esta puesta en la base en un campo para ese fin), para decirle a la SQL desde que fecha a que fecha yo la ingreso en un formulario, y que devuelva su valor y que los ordene por codigo de usuario:
Ejemplo:
Codigo Usuario: 1 Total: 20
Codigo Usuario: 2 Total: 30

Codigo que me tira el error:
<%
Dim ObjDB
Dim ObjRS
Dim Sql

strConnection = "driver={Microsoft Access Driver (*.mdb)}; server=;uid=;pwd=;data source="
Set ObjDB = Server.CreateObject("ADODB.Connection")
ObjDB.Open strConnection


SELECT campo1,campo2,campo3 Sum(campo2) as total FROM Tabla WHERE campo3 BETWEEN '" & request.form("fecha_ini") & "' and '" & request.form("fecha_fin") & "'" ORDER BY campo1 DESC;
set RS = Conn.Execute(sql)


%>


<b><font color="#FF0000"><%=RS("campo1)</font></b>
<b><font color="#FF0000"><%=RS("total)</font></b>

El error que me tira es el siguiente:

Tipo de error:
Error de compilación de Microsoft VBScript (0x800A03FD)
Se esperaba 'Case'
archivo.asp, línea 23, columna 7
Este archivo es el que tiene el codigo de arriva, la columna 23 es la SQL y la linea 7 es entre el select y el sum.

No se a que se refiere con Se esperaba 'Case'.

Gracias anticipadas al que me de una mano con esto.

--------------------------------------------------------------------------
Quien es mas tonto el que pregunta o el que se queda con la duda por no preguntar.

[AlZuwaga]

Un error muy tonto, pero de esos que desesperan ;)


SQL = "SELECT campo1,campo2,campo3 Sum(campo2) as total FROM Tabla WHERE campo3 BETWEEN '" & request.form("fecha_ini") & "' and '" & request.form("fecha_fin") & "'" ORDER BY campo1 DESC;"

[El Jedi]

Amigo, tienes razón, es un error muy tonto como no me di cuenta, me faltaba eso.
Ya lo puse, pero me tira el siguiente error,
Tipo de error:
Error de Microsoft VBScript en tiempo de ejecución (0x800A01A8)
Se requiere un objeto: ''
en la linea 26 y la linea 26 es el set RS = Conn.Execute(sql)


Que puede ser.

Gracias anticipadas al que me de una mano.

--------------------------------------------------------------------------
Quien es mas tonto el que pregunta o el que se queda con la duda por no preguntar.

[AlZuwaga]

Ah, había más errores ;)

Fijate que la conexión la tenés definida como ObjDB:

Set ObjDB = Server.CreateObject("ADODB.Connection")

Y luego, cuando instanciás el objeto récordset (RS), intentás ejecutar una conexión llamada Conn:


set RS = Conn.Execute(sql)


Lo correcto es...

set RS = ObjDB.Execute(sql)


Saludos

[El Jedi]

Amigo tenias razón con lo del objeto era que lo había creado y llamaba a otro cuando ejecutaba la SQL.
Ahora no se que pasa porque en teoría tendría que andar, si esta todo bien, yo no encuentro ningún error.
Te paso el error a ver si tu o alguien se aviva de que le pasa a esto que me esta haciendo renegar como loco,

Tipo de error:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][Controlador ODBC Microsoft Access] Error de sintaxis (falta operador) en la expresión de consulta 'campo3 Sum(campo2)'.

Le pongo las comillas simple donde me dice y nada, yo no se que le pasa a esto.

Gracias anticipadas al que me de una mano con esto.

------------------------------------------------------------------------
Quien es mas tonto el que pregunta o el que se queda con la duda por no preguntar.

[trasgukabi]

'campo3 , Sum(campo2)'