?? publishing.asp
字號:
<link href="style.css" type="text/css" rel="stylesheet">
<!--#include file="conn.asp"-->
<%
dim q
q=request("p")
set rs=server.createobject("adodb.recordset")
sql="select * from book where publishing='"&q&"' order by id desc"
rs.open sql,db,1,3
%>
<body>
<div><%=rs("publishing")%> 出版的圖書</div><br>
<table width="88%" border="0" align="center" cellspacing="0">
<tr align="center" valign="middle" >
<td >圖書名稱</td>
<td >分類</td>
<td>出版社</td>
<td>價格</td>
<td>出版日期</td>
<td >操作</td>
</tr>
<%do while not rs.eof%>
<tr align="center">
<td height="26"><%=rs("bookname")%></td>
<td height="26"><%=rs("booktype")%></td>
<td height="26"><%=rs("publishing")%></td>
<td height="26"><%=rs("bookmoney")%>元</td>
<td height="26"><%=rs("pdate")%></td>
<td height="26">
<%
if session("usertype")="yk" then
response.Write"<a href='login.asp'>登陸</a> <a href='reg.asp'>注冊</a>"
end if
if session("usertype")="admin" then %>
<a href="book.asp?query=mod&id=<%=rs("id")%>">修改</a> <a href="book.asp?query=del&id=<%=rs("id")%>">刪除</a>
<%else if session("usertype")="user" then%>
<%if rs("num") >0 then %>
<a href="borrow.asp?id=<%=rs("id")%>&userid=<%=session("userid")%>" target="right">借閱</a>
<%else
response.Write("沒書咯")%>
<%end if
end if%>
<%end if%></td>
</tr>
<%
rs.movenext
loop
%>
</table>
</body>
<br><br><br>
<div><a href="index.asp" target="right">首頁</a>
<a href="javascript:history.go(-1)" target="right">返回</a>
</div>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -