Foros del Web » Programando para Internet » ASP Clásico »

check box dinámico

Estas en el tema de check box dinámico en el foro de ASP Clásico en Foros del Web. Buenas a todos: Me ha surgido un problema, el caso es que saco de la base de datos una serie de registros de una tabla ...
  #1 (permalink)  
Antiguo 07/05/2008, 05:51
 
Fecha de Ingreso: abril-2008
Mensajes: 51
Antigüedad: 17 años
Puntos: 1
check box dinámico

Buenas a todos:

Me ha surgido un problema, el caso es que saco de la base de datos una serie de registros de una tabla y por cada uno saco un check box de la siguiente manera:

Dim Rs2
Set Rs2 = Server.CreateObject("ADODB.RecordSet")
Rs2.Open SQL2, Reservas, 3, 3
%>
<td colspan="2"><strong><font size="2" face="Verdana, Arial, Helvetica, sans-serif">Escoja el tipo de la foto:<font size="2" face="Verdana, Arial, Helvetica, sans-serif">
<br>
<%
dim vart
vart = 0
While (Not Rs2.EOF)
rs2Id = Rs2("id")

rs2Nombre = Rs2("nombre")

%>
<input type="checkbox" name="chk<%=rs2Id%>" value="<%=rs2Id%>"><%=rs2Nombre%><br>


<%
vart = rs2Id
Rs2.MoveNext
Wend
response.write(rs2Id)
%>

<input name="ocultonumcb" type="hidden" value="<%=vart%>">
<input name="ocultoIdTema" type="hidden" value="<%=rs2Nombre%>">
<%
' Cierro el RecordSet
'=====================
Rs2.Close
Set Rs2 = Nothing
%>

Hasta aqui todo bien, me los muestra, el caso es que al enviar el formulario no se muy bien como comprobar si estan checkeados o no, mi idea seria que por cada uno que este checkeado introduzco una fila en otra tabla con los datos del check box marcado:

ttemas = Upload.Form("ocultonumcb")

For i=0 to ttemas

if upload.form("chk"&i).value = 1 Then


SQL2 = "insert into imagenes_vs_temas(id_foto, id_tema) values ('"&idImagen&"', '"&ttemas&"')"
Reservas.Execute(SQL2)
End if
Next

pd:esto ùltimo es vbscript, ayudenme porfavor!!


gracias de antemano
  #2 (permalink)  
Antiguo 07/05/2008, 08:01
Avatar de JuanRAPerez
Colaborador
 
Fecha de Ingreso: octubre-2003
Mensajes: 2.393
Antigüedad: 21 años, 6 meses
Puntos: 27
Re: check box dinámico

ummmm

bueno
primero que nada

porque haces esto?

ttemas = Upload.Form("ocultonumcb")

no seria

ttemas = request.Form("ocultonumcb")

o estas mandando archivos u otra cosa?

lo que yo haría...

+ leo mi base fuente select * from fotos
+ un ckeckbox con el mismo nombre IDFoto
+ recojo todos los seleccionados (request("IDFoto"), ejemplo = 1,2,4,8,9)
+ mido cuantas comas trae (para saber cuantas veces tengo que hacer un ciclo
++ for i = 1 to totalarrelgo
+ inicio el insert con el valor de mi arreglo
+ voy al siguiente i

no se si te sirva hoy ando un poco lento
suerte
__________________
JuanRa Pérez
San Salvador, El Salvador
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 18:37.