26/03/2008, 13:58
|
 | Colaborador | | Fecha de Ingreso: enero-2002 Ubicación: Centro de la república
Mensajes: 8.849
Antigüedad: 23 años, 3 meses Puntos: 146 | |
| Re: Recibir y guardar checkboxs seleccionados
Bueno
Copia, pega y ejecuta este ejemplo. Lo revisas y preguntas que dudas te quedan.
Código:
<%
if request("boton")<>"" Then 'esto es para distinguir la primera vez que se carga página de cuando se haya ejecutado el formulario
sql = "Insert into tabla (campos) values (valores)"
Campos = ""
Valores= ""
for each control in request.QueryString
for indice=1 to request.QueryString(control).count
if control <> "boton" Then
Campos = Campos & control & ","
Valores= Valores & "'" & request.QueryString(control)(indice) &"',"
End if
next
next
Campos = Left(Campos, Len(Campos)-1)
Valores= Left(Valores, Len(Valores)-1)
sql = Replace(sql, "campos", Campos)
sql = Replace(sql, "valores", Valores)
Response.write sql
Response.End
End If
%>
<html>
<body>
<form action="" method=get>
<%For i=1 to 39%>
<input type="checkbox" value="Valor<%=i%>" name="c_<%=i%>">
<%Next%>
<input type="submit" name="boton" value="Enviar">
</form>
</body>
</html>
Saludos |