Buenas de nuevo,
Sigo con mis problemillas de los select... en esta ocasión tengo un formulario donde hago el ingreso de datos a una tabla mediante un select y tres campos dependientes del select.
El caso es que funciona, pero mete código de identificación del select a la db, me explico, cuando se pulsa el sumit ingresa por ejemplo: 135&socio=Fernandez Fernandez, Pepe y obviamente al hacer una consulta de datos sale también el
135&socio=
Esto es lo que tengo:
Cita: <select name=idBuzo size="1" class="fc_dateHover" onChange="location.href('incluir_buzo.asp?idBuzo=' + formulario.idBuzo.options[formulario.idBuzo.selectedIndex].value)">
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open = MM_cnx_salidas_STRING
SQL_socio="select * from buzos order by socio asc"
set RS_socio=createobject("ADODB.Recordset")
RS_socio.open SQL_socio,conn
do while not RS_socio.eof
socio = RS_socio("socio")
idBuzo = RS_socio("idBuzo")
p = request.querystring("socio")
if p <> "" then
if p = socio then
response.write "<option value="&idBuzo&"&socio="&socio&" selected>"&socio&"</option>"
elseif p <> socio then
response.write "<option value="&idBuzo&"&socio="&socio&">"&socio&"</option>"
end if
else
response.write "<option value="&idBuzo&"&socio="&socio&">"&socio&"</option>"
end if
RS_socio.movenext
loop
RS_socio.close
Set RS_socio = Nothing
%>
</select>
<%
if request.querystring("idBuzo") <> "" then %>
</span></p>
</blockquote>
<p> <font size="1" color="#004250"><b>Nº Socio:
<%
SQL_dat="select * from datos where idbuzo="&request.querystring("idBuzo")&" order by socio asc"
set RS_dat=createobject("ADODB.Recordset")
RS_dat.open SQL_dat,conn
do while not RS_dat.eof
idbuzo = request.querystring("idbuzo")
socio = RS_dat("socio")
DNI = RS_dat("DNI")
TIT = RS_dat("TIT")
%>
<input name="socio" type="text" class="fc_dateHover" value="<%=socio%>" size="8" readonly="true" />
DNI:
<input name="DNI" type="text" class="fc_dateHover" value="<%=DNI%>" size="13" readonly="true" />
Titulación: </b></font>
<input name="TIT" type="text" class="fc_dateHover" value="<%=TIT%>" size="25" readonly="true" />
<%
RS_dat.movenext
loop
RS_dat.close
Set RS_dat = Nothing
%>
</select>
<% end if %>
SaLu2