Ver Mensaje Individual
  #5 (permalink)  
Antiguo 28/05/2003, 08:43
Avatar de u_goldman
u_goldman
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