HELP... Radio Button...

julbama · #1 (**permalink**) 15/07/2002, 18:20

Hola todos , la verdad estoy con pequeño problema, trabajo en asp, sql en un IIS, resulta que tengo una encuesta de 27 preguntas, que se puede evaluar de 0 a 5, como una nota, es decir que cada pregunta puede tener 6 distintas respuestas, mi problema mayor radica en realizar el insert, pero si alguien me puede dar una respuesta global del tema me sentire muy agradecido...

RootK · #2 (**permalink**) 15/07/2002, 23:39

Si mas o menos te entendí es como meterías los radio buttons dentro de la misma página y varios pueden pertencer al mismo grupo, y así sucesivamente..??

Porque no le asignas algo así:
<input type="radio" value="algo1" name="id">
<input type="radio" value="algo2" name="id">
<input type="radio" value="algo3" name="id">
..
..
<input type="radio" value="algo1" name="id2">
<input type="radio" value="algo2" name="id2">
<input type="radio" value="algo3" name="id2">

Espero haberme dado a entender.. o que es exactamente lo que deseas..??

Saludos..! ;)

<html><center><embed src="http://www.angelfire.com/on/cobainss/Movie1.swf" height=80 width=200><BR></embed></center></html>

Yoston · #3 (**permalink**) 16/07/2002, 01:47

Hola...mira yo haria algo asi...
crearia una pagina ASP llamada mi_pagina.asp
la cual seria asi..
<%
'mostrar las preguntas desde una bd
sub mostrar()
%>
<html>
<body>
<form name="preguntas" action="mi_pagina.asp?ac=BD" method="post">
<TABLE cellSpacing=1 cellPadding=1 width="75%" border=1>
<TR>
<TD>
<P align=center>N°</P></TD>
<TD>
<P align=center>Pregunta</P></TD>
<TD>
<P align=center>Nota</P></TD></TR>
<TR>
<%
sql="select * from preguntas"
rs.Open sql,conexion,2,2
i=0
while not rs.EOF
i=i+1
Nota="Nota"&i
%>
<TD>
<P align=center><%=i%></P></TD>
<TD>
<P align=center><%=rs.Fields("Pregunta&quo t;)%></P></TD>
<TD>
<P align=center><SELECT style="WIDTH: 97px" name="<%=Nota%>">
<OPTION value="0" selected>0</OPTION>
<OPTION value="1">1</OPTION>
<OPTION value="1">2</OPTION>
<OPTION value="1">3</OPTION>
<OPTION value="1">4</OPTION>
<OPTION value="1">5</OPTION>
</SELECT>
</P>
</TD>
</TR>
<%rs.MoveNext
wend
rs.close
%>
<input type="hidden" name="contador" value="<%=i%>">
</TABLE>
<input type="submit" value="Guardar">
</form>
</body>
</html>
<%
'se crearia la tabla con todas las preguntas..y se guarda la cantidad de preguntas en un contador
end sub

sub guardaBD()
'recuperamos el total de preguntas y guardamos a la BD
cont=int(Request.Form("contador"))
while cont>0
dato=cstr("Nota"&cont)
Nota=Request.Form(dato)
sql="Insert into respuesta values('"&Cont&"','"&No ta&"')"
rs.Open sql,conexion,2,2
cont=cont-1
wend
%>
<script>alert("Los Valores fueron guardado con exito")</script>
<%
end sub

accion=Request.QueryString("ac")
'tu creas tu BD y tu conexion
conectarBD
select case accion
case "BD"
call guardaBD()
case else
call mostrar()
end select
%>
espero que te sirva

..echale un

chausito

<P><center><IMG SRC="http://web.icq.com/photo_repository/jpg/0,,120600736-0-0,00.jpg" ALT="Hola Soy Yoston." WIDTH=90 HEIGHT=90></center>
<center><font color="royalblue" face="verdana" size="3">Y O S T O N</center>[/CODE]</P>

julbama · #4 (**permalink**) 16/07/2002, 08:35

Hola, gracias por responder... pero parece que me no me explique muy bien... pero ahi va el código....

<96
Dim BD__Cod
BD__Cod = "0"
if (Request("Cod") <> "") then BD__Alumno_cod = Request("Cod")
96>
<96
Dim BD__Asig
BD__Asig = "%"
if (Request("Asig") <> "") then BD__Asig = Request("Asig")
96>
<96
Dim BD__Agno
BD__Agno = "0"
if (Request("Agno") <> "") then BD__Agno = Request("Agno")
96>
<96
Dim BD__Sem
BD__Semestre = "0"
if (Request("Sem") <> "") then BD__Sem = Request("Sem")
96>
<96
Dim BD__Par
BD__Par = "0"
if (Request("Par") <> "") then BD__Par = Request("Par")
96>
<96
Dim BD__Enc_cod
BD__Enc_cod = "2"
if (Request("Enc_Cod") <> "") then BD__Enc_cod = Request("Enc_Cod")
96>
<96
Dim BD__Numero_pregunta
BD__Numero_pregunta = "1"
if (Request("Name") <> "") then BD__Numero_pregunta = Request("Name")
96>
<96
Dim BD__Respuesta_cod
BD__Respuesta_cod = "0"
if (Request("Value") <> "") then BD__Respuesta_cod = Request("Value")
96>
Bueno este es el codigo que me recibe las respuestas desde un formulario, y el problema esta en que
BD__Numero_pregunta = Request("Name")va desde el 1 al 27 y por cada uno de ellos tengo un BD__Respuesta_cod = Request("Value")
que puede tomar un valor de 0 a 5, pero me inserta en la base solo el primer registro con los datos necesarios, despues realice un bucle con un for y me escribio los 27 registros en la base de datos pero no le asigno el ("Value") correspondiente, solo el valor que tengo definido por defecto....
Espero que ahora este mas clara la cosa...