📄 browse.asp
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>网上图书馆--图书浏览</title>
<%
name=request("RN")
id=request("RID")
set rs=server.createobject("adodb.recordset")
id=trim(request("id"))
Sql="select ID,Title,Author,SortName,Pages,Price,Introduction,Carrier,Publisher,PublishDate,BookShelf=isnull(BookShelf,' '),"
Sql=sql & " LentNum,BespokenNum,MangledNum,SuppliedNum from bookproperties a inner join booksort b on a.sort=b.sortcode where id='" & id & "'"
if rs.state=1 then
rs.close
end if
rs.open Sql,conn,1,1
%>
</head>
<body>
<form method=post >
<table border="0" width="100%" height="25" bgcolor="#2487E1" id="table1" >
<tr><td> <p align="center">
<img border="0" src="image/top.jpg" width="725" height="59"></td>
</tr></table>
<table border="1" width="100%" height="25" bgcolor="#2487E1"
bordercolor="#C0C0C0"> <tr>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="Select.asp"><font color="#FFFFFF">图书检索</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="BorrowCase.asp"><font color="#FFFFFF">状态查询</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href="PWDModify.asp"><font color="#FFFFFF">修改密码</font></a></font></b></td>
<td align="center" bgcolor="#2487E1"><b><font color="#FFFFFF" size="2">
<a href=index.asp><font color="#FFFFFF">退出登录</font></a></font></b></td></tr></table>
<table border="1" width="100%" bordercolorlight="#C0C0C0"
bordercolordark="#808080" bgcolor="#00FFFF" id="table3" height="306">
<% if not rs.eof then %>
<TR height=20px > <TD align=center colspan=4 height="32"><b>
<font size="2" color="#0000FF"> <%=trim(rs("ID")) & " " & trim(rs("Title"))%></font></b></TD> </TR>
<TR height=20px > <TD align=center bgcolor="#00FFFF" width="9%" height="25"><b><font size="2" color="#0000FF"> 作者</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="46%" height="25"><%=trim(rs("Author")) %></TD>
<TD align=left bgcolor="#00FFFF" width="11%" height="25"><b><font size="2"
color="#0000FF"> 载体</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="42%" height="25"><%=trim(rs("Carrier"))%></TD> </TR>
<TR height=20px >
<TD align=center bgcolor="#00FFFF" width="9%" height="27"><b><font size="2"
color="#0000FF">类别</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="46%" height="27"><%=trim(rs("SortName"))%></TD>
<TD align=left bgcolor="#00FFFF" width="11%" height="27"><b><font size="2" color="#0000FF"> 出版社</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="42%" height="27"><%=trim(rs("Publisher"))%></TD></TR>
<TR height=20px >
<TD align=center bgcolor="#00FFFF" width="9%" height="27"><b><font size="2" color="#0000FF">页数</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="46%" height="27"><%=trim(rs("Pages"))%> </TD>
<TD align=left bgcolor="#00FFFF" width="11%" height="27"><b><font size="2" color="#0000FF"> 出版时间</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="42%" height="27"><%=trim(rs("PublishDate"))%></TD></TR>
<TR height=20px >
<TD align=center bgcolor="#00FFFF" width="9%" height="25"><b>
<font size="2" color="#0000FF">价格</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="46%" height="25"><%=trim(rs("Price"))%></TD>
<TD align=left bgcolor="#00FFFF" width="11%" height="25"><b><font size="2"
color="#0000FF"> 书架</font></b></TD>
<TD align=center bgcolor="#00FFFF" width="42%" height="25"><%=trim(rs("BookShelf"))%></TD></TR>
<TR height=20px >
<TD align=center bgcolor="#00FFFF" width="9%" height="128"><b>
<font size="2" color="#0000FF">简介</font></b></TD>
<TD align= left colspan=3 bgcolor="#00FFFF" width="89%"
height="128"><%=trim(rs("Introduction"))%></TD> </TR>
<TR height=20px >
<TD align=center colspan=4 bgcolor="#00FFFF" height="24" >
<% Response.Write ("本书借出" & rs("LentNum") & "本，预约" & rs("BespokenNum") & "本，在库" & rs("SuppliedNum") & "本" ) %>
</TD>
</TR>
<% end if %>
<tr><td colspan=4 bgcolor="#00FFFF" height="24" align=right> <a href ="BorrowCase.asp?op=3&id=<%=Session("ReaderId")%>
<a href ="show.asp">"返回</td></tr>
<%
end if
%>
</Table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -