Filtrar Resultados con Combos

[nemesixxx]

Esto es el código de la búsqueda:

Código asp:

<%
if session("nombre")="" or session("nivel")<1 then
    response.Redirect("index.asp")//lo llevo a la página de login
end if
 
    set cnn=server.CreateObject("ADODB.Connection")
    set rs=server.CreateObject("ADODB.Recordset")
    set rsasignaturas=server.CreateObject("ADODB.Recordset")
    set rscursos=server.CreateObject("ADODB.Recordset")
    ruta=server.MapPath("../db/bd.mdb")
    cnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & ruta & ";User Id=admin;Password=;"
    miasignatura=Request.Form("cmbasignaturas")
    micurso=Request.Form("cmbcursos")
    
If miasignatura="0" AND micurso="0" Then
'esto es si seleccionan todas las asignaturas asignatura y todos los cursos
    rs.open "select * from pedidos where idusuarios="&session("id") &" AND fechaimpresion is not NULL AND fechaimpresion BETWEEN #"& request.form("fechainicial") &"# AND  #"& request.form("fechainicial") &"#",cnn,3,3
    ElseIf miasignatura="0" AND micurso<>"0" Then
    'esto es si seleccionan todas las asignaturas y un curso
    rs.open "select * from pedidos where idusuarios="&session("id") &" AND fechaimpresion is not NULL AND curso = '" & Request.form("cmbcursos") &"' AND fechaimpresion BETWEEN #"& request.form("fechainicial") &"# AND  #"& request.form("fechainicial") &"#",cnn,3,3
        ElseIf miasignatura<>"0" AND micurso="0" Then
            'esto es si seleccionan una asignatura y todos los cursos
        rs.open "select * from pedidos where idusuarios="&session("id") &" AND fechaimpresion is not NULL AND asignatura = '" & Request.form("cmbasignaturas") &"' AND fechaimpresion BETWEEN #"& request.form("fechainicial") &"# AND  #"& request.form("fechainicial") &"#",cnn,3,3
        Else
            'esto es si seleccionan una asignatura y un curso
        rs.open "select * from pedidos where idusuarios="&session("id") &" AND fechaimpresion is not NULL AND asignatura = '" & Request.form("cmbasignaturas") &"' AND curso = '" & Request.form("cmbcursos") &"' AND fechaimpresion BETWEEN #"& request.form("fechainicial") &"# AND  #"& request.form("fechainicial") &"#",cnn,3,3
End If
%>
 

Y así es como lo "pinto" en la tabla:

Código asp:

<table width="634" border="0" align="center" class="bordetablas">
            <tr class="titular">
              <td width="115"><div align="center">Fecha de impresi&oacute;n</div></td>
              <td width="86"><div align="center">Asignatura</div></td>
              <td width="107"><div align="center">Curso</div></td>
              <td width="143"><div align="center">Concepto</div></td>
              <td width="49"><div align="center">Copias</div></td>
              <td width="74"><div align="center">Hojas/copia</div></td>
              <td width="26"><div align="center">Ver</div></td>
            </tr>
<%while not rs.eof%>
            <tr class="textonormal">
              <td><div align="center"><span class="titular"><span class="textonormal"><%=rs("fechaimpresion")%></span></span></div></td>
              <td><div align="center"><span class="textonormal"><%=rs("asignatura")%></span></div></td>
              <td><div align="center"><span class="textonormal"><%=rs("curso")%></span></div></td>
              <td><div align="center"><span class="textonormal"><%=rs("pedido")%></span></div></td>
              <td><div align="center"><span class="textonormal"><%=rs("copias")%></span></div></td>
              <td><div align="center"><span class="textonormal"><%=rs("originales")%></span></div></td>
              <td><div align="center"><a href="#"><img src="../../images/ver.png" alt="ver" width="16" height="16" border="0" onclick="AbreVentana('recibo.asp?idpedidos=<%=rs("idpedidos")%>')""/></a></div></td>
            </tr>
<%
  rs.movenext
  wend
  %>
    </table>