📄 bookview.asp
字号:
<!--#include File="ConnDB.asp"-->
<html>
<head>
<title>查看图书信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href=style.css rel=STYLESHEET type=text/css>
</head>
<Script language="javascript">
function newOrder(url) {
var oth="toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=yes,resizable=yes,left=200,top=200";
oth = oth+",width=500,height=150";
var newOrder=window.open(url,"newOrder",oth);
newOrder.focus();
return false;
}
//放入购物车
function OpenBask(bid){
var url;
url = "/shop/shop/BasketIn.asp?id=" + bid;
newOrder(url);
}
</Script>
<body>
<%
set rs=server.createobject("adodb.recordset")
Dim id,iname
id = Request.QueryString("id")
sql = "Select * From Books Where id="&Cint(id)
Set rsBooks = conn.Execute(sql)
If rsBooks.Eof Then
Response.Write "没有此图书信息"
Response.End
Else
iname = rsBooks("ImageFile")
'更新阅读次数
sql = "Update Books Set ReadCount=ReadCount+1 Where id="&Cint(id)
conn.Execute(sql)
%>
<form method="POST" name="form1">
<table border="1" width="100%" cellspacing="1" bordercolorlight="#C0C0C0" bordercolordark="#FFFFFF">
<tr>
<td width="70%"><font color=blue>图书类别</font>
<%
sql = "SELECT * FROM BookType WHERE TypeID=" & rsBooks("typeid")
rs.Open sql,conn,3,3
If rs.EOF Then
%> 没有类别信息
<%
Else
Response.Write(rs("TypeName"))
End If
rs.Close
%>
</select>
</td>
<td width="30%" rowspan="7" align=center><% If IsNull(iname) Or iname = "" Then%>
<img src="images\noImg.jpg" width="120" border=0>
<%Else%><img src="admin\images\<%=rsBooks("ImageFile")%>" width="90" border=0>
<%End If%></td>
</tr>
<tr>
<td><font color=blue>图书名称</font>
<%=rsBooks("BookName")%></td>
</tr>
<tr>
<td><font color=blue>ISBN</font>
<%=rsBooks("ISBN")%></td>
</tr>
<tr>
<td><font color=blue>出 版 社</font>
<%=rsBooks("Publisher")%></td>
</tr>
<tr>
<td><font color=blue>图书作者</font>
<%=rsBooks("Author")%></td>
</tr>
<tr>
<td><font color=blue>图书页数</font>
<%=rsBooks("PageNum")%></td>
</tr>
<tr>
<td><font color=blue>出版时间</font>
<%=rsBooks("PublishDate")%></td>
</tr>
<tr>
<td colspan="2"><font color=blue>销售价格</font>
<%=rsBooks("SalePrice")%></td>
</tr>
<tr>
<td colspan="2"><font color=blue>图书简介</font></td>
</tr>
<tr>
<td colspan="2"><%=rsBooks("Content")%></td>
</tr>
</table>
<p align="center"><center>
<a href='javascript:OpenBask(<%=rsBooks("id")%>)'><img border="0" src="images/order.gif"></a><BR><BR>
<a href="javascript:window.close();">[关闭]</a></center></p>
</form>
<%End If%>
</body>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -