Está algo díficil ayudarte, pero te recomiendo una pequeñas cosillas:
1 - Los objeto ADO
Código:
Set ObjConexion = Server.CreateObject("ADODB.connection")
Set ObjRs = Server.CreateObject("ADODB.Recordset")
ObjConexion.Open CadenaConexion
ObjRs.Open CadenaSql, ObjConexion
.......
ObjRs.Close
ObjConexion.Close
Tienes que abrir y luego cerrar los objetos ADO.
En tu codigo en el segudno parametro has puesto en el metodo Open del RecordSet la cadena de conexión, lo caul es incorrecto, tiene poner el Objeto de conexión.
2- Intenta ejecutar la consulta haciendo un Select *, para ver si logras presetnar los datos
3- Luego Filtra pero paso a paso, un parametro primero y ve si te ejecuta, luego ve aunmento los parametros hata que tengas la consulta que necesitas.
4- Hora empeza a selecionar los campos que mostrarás uno a uno, para que vayas viendo como se van presentando los datos.
Te recomiendo esto para que puedas saber en que parte de la consulta se te presenta el problema, si es que el problema es la consulta.
Saludes