Problemas para comparar dos datos de un recordset

[emont]

Tengo la siguiente problema:

Estoy tratando de comparar dos recorset para saber si su contenido es igual, pero me aparece el siguiente mensaje de error:

Error de Microsoft VBScript en tiempo de ejecución error '800a000d'

No coinciden los tipos: 'rsmodcod'

/callc/Ing_modulos.asp, line 76


la linea 76 es :
<input type="checkbox" name="caja" id="caja" value="<%=rspadre("cod")%>" <%if rsmodcod("cod")=rspadre("cod") then%> checked <%rsmodcod.movenext%><%end if%>>

Ya hice cambios con el cint() pero tampoco funciona, como puedo solucionar esto?

Muchas gracias por la ayuda.

Nota: es de anotar que los campos corresponden a una tabla en una base de datos MySQL.

[dToLarg]

Prueba convirtiendo los valores a string de esta forma

Ej: #1

If Cstr(rsmodcod("cod")) = Cstr(rspadre("cod")) then

Ej: #2
Verifica que los campos que quieres comparar sean del mismo tipo de no ser asi utiliza el Ej: #1.

If Cstr(rsmodcod.Fields("cod")) = Cstr(rspadre.Fields("cod")) Then

[emont]

Gracias por el mensaje y ya hize la modificación que me sugeriste pero desafortunadamente me sale el siguiente mensaje de error:

Error de Microsoft VBScript en tiempo de ejecución error '800a01a8'
Se requiere un objeto: ''
/callc/Ing_modulos.asp, line 76

[ElAprendiz]

prueba en vez de cint() clng()

[AlZuwaga]

no se si será la solución al error "No coinciden los tipos", pero veo un error lógico en la línea 76. Según me parece, debería quedar así:


<input type="checkbox" name="caja" id="caja" value="<%=rspadre("cod")%>" <%if rsmodcod("cod")=rspadre("cod") then%> checked <%end if%>><%rsmodcod.movenext%>


o algo similar