
28/05/2003, 08:43
|
 | Moderador | | Fecha de Ingreso: enero-2002
Mensajes: 8.031
Antigüedad: 23 años, 4 meses Puntos: 98 | |
A ver, tienes tu combo dinámico:
<form action=archivo2.asp method=post>
<select name=mi_combo>
<%While not rs.EOF%>
<option value="<%=rs("campo")%>"><%=rs("campo")%></option>
<%Wend%>
</select>
<input type=submit value=Enviar>
</form>
--------------archivo2.asp-------------------------
valor= request.Form("mi_combo")
If valor <> "" Then
'Si el campo de tu DB es numérico
strSQL= "SELECT campo1, campo2, campoN FROM tabla WHERE campo = " & valor
'Si el campo de tu DB es texto
Set nuevoRs= Server.createObject("ADODB.Recordset")
strSQL= "SELECT campo1, campo2, campoN FROM tabla WHERE campo = '" & valor & "'"
conn.Open strSQL, Conn, 3, 3
'A partir de aqui construyes tu tabla
%>
<table>
<%While not nuevoRs.EOF%>
<tr>
<td><%=nuevoRs("campo")</td>
</tr>
<%
nuevoRs.MoveNext
Wend
%>
nuevoRs.CLose
Set nuevoRs= nothing
</table>
<%
End If
Salu2,
__________________ "El hombre que ha empezado a vivir seriamente por dentro, empieza a vivir más sencillamente por fuera."
-- Ernest Hemingway |