📄 book.asp
字号:
response.write trim(rs_list_ip("his_url_name"))
end if
response.write "</font></a></td></tr>"
rs_list_ip.movenext
loop
rs_list_ip.close
set rs_list_ip=nothing
%>
<tr>
<td height=3>
</tr>
</table>
<tr>
<td height=3><img src=imgside/pic_cartinfobottom3.gif width=155 height=3></td>
</tr>
</table>
</tr>
</table>
<td width=15></td>
<td valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr><td>
<table width="100%" border="0" cellSpacing=0 cellPadding=0>
<tr><td>
<table border="0" width="80%" cellSpacing=0 cellPadding=0><br>
<tr><td>
<table border="0" cellSpacing=0 cellPadding=0>
<tr>
<td vAlign=top style="PADDING-LEFT: 6px"><img height=103 hspace=5 src="images/bg_book.gif" width=71 vspace=5 border=0> <P style="MARGIN-TOP: -112px"><IMG height=96 alt=图书封面 hspace=5 src=
<%
if trim(rs2("bookpic"))="" then
response.write "images/emptybook.gif"
else
response.write trim(rs2("bookpic"))
end if
%> width=65 vspace=3 border=0></td>
</tr>
</table>
<td>
<table border="0" cellpadding="0" cellspacing="0">
<tr>
<td><font color=red size=2><b><%=trim(rs2("bookname"))%></b></font></td>
</tr>
<tr>
<td height=10></tr>
<tr>
<td>·市场价：<%=formatnumber(rs2("shichangjia"),2)%>元</td>
</tr>
<tr>
<td>·折 扣：<%response.write rs2("dazhe")*100&".00%"%></td>
</tr>
<tr>
<td>·会员价：<%=formatnumber(rs2("huiyuanjia"),2)%>元</font></td>
</tr>
<tr>
<td>·可节省：<%=formatnumber(round(rs2("shichangjia")-rs2("huiyuanjia"),2),2)%>元</td>
</tr>
<tr>
<td height=5></td>
</tr>
</table>
</tr>
</table>
<tr><td>
<table width="100%" border="0" cellspacing="1" cellpadding="1">
<tr>
<td height="37"><b>【浏览量】</b><font color=#ff0000><%=rs2("liulancount")%></font> 次</td>
<td height="37"><div align="center"><%response.write"<a href=# onClick=""javascript:window.open('add_bk.asp?bookid="&rs2("bookid")&"&purchase=1','','width=730,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;""><img src=images/ord_biggw.gif width=110 height=30 border=0 align='middle'></a>"%>
<td height="37"><div align="center"> <a href="shoucang.asp?action=add&id=<%=rs2("bookid")%>" target=_blank><img src="images/ord_bigsc.gif" width="110" height="30" border="0" align="middle"></a></td>
</tr>
</table>
<tr><td>
<table width="98%" border="0" cellpadding="1" cellspacing="1">
<tr height=25>
<td bgcolor="#EEF3F9"><b>【评 级】</b>
<%
call pingji()
response.write "<td bgcolor='#EEF3F9'><div align=right><a href=# onClick=""javascript:window.open('pingji.asp?id="&bookid&"','','width=295,height=235,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"">发表您对本书的评级</a> </div></td>"
%>
</tr>
<tr height=25>
<td colspan="2" style="PADDING-LEFT: 60px">共有<font color="#FF0000"> <%=rs2("pingji")%></font> 位网友参与了评级</td>
<tr>
<%
if rs2("bookzz")<>"" then
response.write "<form name=searchbookzz method=post action=research.asp>"
response.write "<td colspan='2' width=30% ><div><input type=hidden name=searchkey value="&trim(rs2("bookzz"))&"<input type=hidden name=selectaction value=2>"
response.write "<b>【作 者】</b><a href=research.asp?action=2&searchkey="&trim(rs2("bookzz"))&" target=_blank>"&trim(rs2("bookzz"))&"</a></div></td></form>"
end if%>
</tr>
<tr height=25>
<td colspan="2" bgcolor="#EEF3F9"><b>【出版社】</b><%=trim(rs2("bookchuban"))%></td>
</tr>
<tr>
<td><b>【所属分类】</b></td>
</tr>
<%
set rs3=server.CreateObject("adodb.recordset")
rs3.open "select * from shop_anclass where anclassid="&rs2("anclassid"),conn,1,3
set rs4=server.CreateObject("adodb.recordset")
rs4.open "select * from shop_nclass where nclassid="&rs2("nclassid"),conn,1,3
%>
<tr>
<td colspan="2" style="PADDING-LEFT: 60px"><a href=index.asp>聚知网</a>--><a href="class.asp?aid=<%=rs2("anclassid")%>"><%=trim(rs3("anclass"))%></a>--><a href="class.asp?aid=<%=rs2("anclassid")%>&nid=<%=rs2("nclassid")%>"><%=trim(rs4("nclass"))%></a></td>
</tr>
<tr height=25>
<td bgcolor="#EEF3F9">【版 次】<%=rs2("banci")%>次</td><td bgcolor='#EEF3F9'><div>【日 期】<%=trim(rs2("bookdate"))%></div></td>
</tr>
<tr height=25>
<td>【开 本】<%=trim(rs2("kaiben"))%></td><td><div>【页 数】<%=rs2("yeshu")%>页</div></td>
</tr>
<tr height=25>
<td bgcolor="#EEF3F9">【装 帧】<%=trim(rs2("zhuang"))%></td><td bgcolor='#EEF3F9'><div>【ISBN】<%=trim(rs2("isbn"))%></div></td>
</tr>
</table>
</tr>
</table>
<%
rs3.close
set rs3=nothing
rs4.close
set rs4=nothing
%>
<td valign="top" width="155">
<table width="100%" border="0" cellspacing="0" cellpadding="0"><br>
<tr>
<td><!--#include file="userinfo.asp"--></td>
</tr>
</table>
</tr>
</table>
<tr>
<td colspan="2" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr height=25><br>
<td bgcolor="#EEF3F9"><b>【内容简介】</b></td><td bgcolor='#EEF3F9'><div align=right><a href="#ml"><font size=2>目 录</font></a> </div></td>
</tr>
<tr height=25>
<td colspan="2">
<%
if rs2("bookcontent")<>"" then
response.write "<table width=19 height=4 border=0 cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>"&trim(rs2("bookcontent")&"<table width=19 height=6 border=0 cellpadding=0 cellspacing=0><tr><td height=6></td></tr></table>")
end if
set rs1=server.CreateObject("adodb.recordset")
rs1.open "select * from shop_pinglun where bookid="&bookid&" and shenhe=1 order by pinglundate desc",conn,1,1
response.write "<tr height=25><td bgcolor='#EEF3F9'><b>【读者评论】</b>共有<font color=#FF0000> "&rs1.recordcount&" </font>条图书评论"
response.write "<td bgcolor='#EEF3F9'><div align=right><a href=# onClick=""javascript:window.open('pinglun.asp?id="&bookid&"','','width=295,height=185,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=no');return false;"" ><img src=images/my_review.gif width=93 height=20 border=0 alt=用户评论></a></div></td></tr>"
if rs1.eof and rs1.bof then
response.write"<tr><td colspan=2>目前还没有评论，欢迎发表您的评论，有可能您的评论成为该商品的首条！<br>"
response.write "您的评论在提交后将经过我们的审核，谢谢合作。</td></tr>"
else
'//用户评论
do while not rs1.eof
%>
<tr>
<td colspan="2" height="2" background="images/pl_line_bg.gif"></td>
</tr>
<tr height=25>
<td colspan="2"><img src="images/plb.gif" width="15" height="15" align="absmiddle">作者: <font color=blue><%=rs1("pinglunname")%></font> <%=rs1("pinglundate")%><br>
</tr>
<tr>
<td colspan="2" height="5"></td>
</tr>
<tr>
<td colspan="2"><%=rs1("pingluncontent")%></td>
</tr>
<%
rs1.movenext
loop
rs1.close
set rs1=nothing
end if
%>
<tr>
<td height=20"></td>
</tr>
<tr height=25>
<td colspan="2" bgcolor="#EEF3F9"><b>【<a name="ml">目录</a>】</b></td>
</tr>
<tr>
<td colspan="2">
<%
if rs2("bookmulu")<>"" then
response.write "<table width=19 height=4 border=0 cellpadding=0 cellspacing=0><tr><td height=4></td></tr></table>"&trim(rs2("bookmulu"))&"<table width=19 height=6 border=0 cellpadding=0 cellspacing=0><tr><td height=6></td></tr></table>"
end if
%>
</tr>
</table>
<tr>
<td colspan="2"> <b>本站发表读者评论，并不代表我们赞同或者支持读者的观点。我们的立场仅限于传播更多读者感兴趣的信息。</b></td>
</tr>
</table>
</tr>
</table>
<%
rs2.close
set rs2=nothing
%>
<!--#include file="service.asp"-->
<!--#include file="copyright.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -