Ayuda- Recordset-Checkbox

[alegna_13]

Hola:
Espero que alguien me pueda ayudar con esto; tengo estos ASP´s en un checkbox para que dependiendo de los resultados que obtenga de uno de los recorset los compare con otro recordset y seleccione o no la casilla de verificación; sin embargo me surgio un problema con esta parte:

if (j = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>

Me manda error de "Type mysmatch" alguien puede ayudarme a resolver el problema??? gracias Pongo el codigo completo del check por cualquier duda.

////////////////////////////////////////////////////////////////////////////////////////////////////////
<input type="hidden" name="h_total" value="<%=i%>" />
<%if i >= 1 then%>
<%End if%>
<%While (NOT rs_selecciona.EOF)
j = j +1
if (j = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>
<input name="<%response.Write("check" & rs_muestra("dep_id"))%>" type="checkbox" value="1" class="cuadros" <%if rs_muestra("dep_id") = rs_selecciona("dep_id") then%>checked="checked"<%End if%> >
<%End if
rs_selecciona.movenext
Wend
rs_selecciona.movefirst
%>
////////////////////////////////////////////////////////////////////////////////////////////////////////

[Adler]

Hola

El error te dice que no encajan los tipos, así que lo más probable sea que tengas que convertir la var j en interger

if (CInt(j) = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>

Suerte

[alegna_13]

Hola Adler, primero que nada grax por responder.

Ya probé cambiando la linea de codigo con el ejemplo que me pusiste:

if (CInt(j) = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>

Pero desafortunadamente sigue enviando el mismo error, alguna otra idea??? Gracias

[zeudio]

hola amigo

el error definitivamente se debe a una inconcistencia en el tipo de dato y creo que esta en ubound(total_registros,2)), que no se si devuelva un entero pero si no es asi ahi esta el error, ya que lo estas comparando con j que si es un entero.

si es entero prueba asi int(ubound(total_registros,2)))

saludos

[Adler]

Hola

Manten el CInt. Y ahora declara j

Código asp:

<%
Dim j 
j = 0
While (NOT rs_selecciona.EOF)
j = j +1
if (j = ubound(total_registros,2)) or ( rs_muestra("dep_id") = rs_selecciona("dep_id")) then%>
<input name="<%response.Write("check" & rs_muestra("dep_id"))%>" type="checkbox" value="1" class="cuadros" <%if rs_muestra("dep_id") = rs_selecciona("dep_id") then%>checked="checked"<%End if%> >
<%End if
.....
 

Suerte