Hola.
Tengo una pagina donde visualizao una serie de datos. He puesto un menu desplegable para hacer una busqueda seleccionada. Os pongo aqui el codigo para que veais como lo hago:
Lo que me han comentado es que ponga dos menus desplegables para hacer busquedas segun 2 campos.
Como podría hacerlo segun esta manera???
gracias.
CODIGO:
<tr>
<td align="left" valign="top"><table width="100%" >
<tr align="left" valign="top">
<td width="30%" valign="middle"><span>
<%
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "Driver={MySQL};SERVER=lldd216.servidoresdns.net;P ort=3306;Database=xxx;Uid=xxx;Pwd=xxx;"
sql="select * from asunto_comunicacion"
set rs=con.execute(sql)
response.Write("<select name='asunto'>")
do while not rs.eof
response.Write("<option value='"&rs("asunto")&"'>"&rs("asunto")&"</option>")
rs.movenext
loop
response.Write("<option value='todos' selected>TODOS</option")
response.Write("</select>")
%>
</span></td>
<td valign="middle">
<input type="submit" name="Submit32" value="ACEPTAR">
</td>
</tr>
</table></td>
</tr>
<tr>
<td align="left" valign="top"><br>
<%
Mostrar = Request.QueryString("Mostrar")
If Mostrar = "Yes" Then
asunto = Request.Form("asunto")
Set Con = Server.CreateObject("ADODB.Connection")
Con.Open "Driver={MySQL};SERVER=lldd216.servidoresdns.net;P ort=3306;Database=xxx;Uid=xxx;Pwd=xxx;"
if asunto= "todos" then
sql= "select * from notas_prensa order by fecha desc "
Set rs = con.Execute(sql)
else
sql= "select * from notas_prensa where asunto='"&asunto&"' order by fecha desc "
Set rs = con.Execute(sql)
end if%>
