|
Búsqueda »
Resultado:
<%if rslibros.recordcount=1 then
response.write("1 libro encontrado")
else%>
<%=formatnumber(rslibros.recordcount,0)%> libros encontrados
<%end if%>
Resultado de la Búsqueda
<%if request.form("tema")<>0 then
rstemas.open "select * from temas where codtema="&request.form("tema") ,conn ,adOpenKeyset ,adLockOptimistic%>
Libros de <%=rstemas("nombretema")%>
<%if request.form("tipo")<>0 then
rstipos.open "select * from tipos where codtipo="&request.form("tipo") ,conn ,adOpenKeyset ,adLockOptimistic%>
, <%=rstipos("nombretipo")%>
<%rstipos.close
else
response.write("")
end if
rstemas.close
end if
if request.form("titulo")<>"" then%>
con el texto "<%=request.form("titulo")%>" en el Título
<%end if
if request.form("autor")<>"" then%>
con el texto "<%=request.form("autor")%>" en el Autor
<%end if
if request.form("editorial")<>"" then%>
con el texto "<%=request.form("editorial")%>" en la Editorial
<%end if
if request.form("compra")<>"" then%>
comprados en <%=request.form("compra")%>
<%end if%>
|
|
Índice |
Título |
Autor |
Editorial |
|
<%num=1
do until rslibros.eof
rstemas.open "select * from temas where codtema="&rslibros("codtema") ,conn ,adOpenKeyset ,adLockOptimistic
rstipos.open "select * from tipos where codtipo="&rslibros("codtipo") ,conn ,adOpenKeyset ,adLockOptimistic%>
<%=num%>.
','a','scrollbars=no,height=500,width=500,status=no,toolbar=no,menubar=no,location=no');">
','a','scrollbars=no,height=150,width=300,status=no,toolbar=no,menubar=no,location=no');">
|
<%=rstemas("numero")%>.<%if rslibros("codtipo")=0 then
response.write("0")
else
response.write(rstipos("numero"))
end if%>.<%=rslibros("numero")%>
|
><%=rslibros("titulo")%>
|
<%=rslibros("autor")%>
|
<%=rslibros("editorial")%>
|
<%
if rslibros("libre")=true then%>
','a','scrollbars=no,height=350,width=300,status=no,toolbar=no,menubar=no,location=no');">Ocupar
<%else%>
Ocupado
<%end if%>
|
<%rstemas.close
rstipos.close
rslibros.movenext
num=num+1
loop
rslibros.close%>
|
|
