📄 bkzt02.asp
字号:
<!--#include file="conn.asp"-->
<!--#include file="webtop.asp"-->
<HTML>
<head><title><%=webname%>--章立民专题</title>
<meta http-equiv="Content-Type" content="text/html; chars2et=gb2312">
<link href="images/css.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
dim rs2,i,ii
i=0
ii=0
set rs2=server.CreateObject("adodb.recordset")
rs2.open "select * from shop_books where bookzz='章立民' and nclassid=13 order by adddate desc",conn,1,3
%>
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
<br>
<div><font color=blue size=2>VFP类图书</font></div>
<tr>
<%do while not rs2.eof
i=i+1%>
<td valign="top" bgcolor="#EEF3F9">
<TABLE align="center" cellSpacing=0 cellPadding=0 width=100% border=0>
<td vAlign=top width="15%" 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"><a href=<%=trim(rs2("bookpic"))%> target=_blank><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></A></td>
<td vAlign=top width="85%"><A class=a4
href=book.asp?id=<%=rs2("bookid")%> target=_blank><font color=#FF6600><%=trim(rs2("bookname"))%></font></A><BR>
市场价：<%=formatnumber(rs2("shichangjia"),2)&"元"%><BR>
会员价：<font color=#FF6600><%=formatnumber(rs2("huiyuanjia"),2)&"元"%></font><BR>
节 省：<%=formatnumber(round(rs2("shichangjia")-rs2("huiyuanjia"),2),2)%>元<br>
<%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/ind_gw.gif width=43 height=12 border=0 align='middle'></a>"%>
<a href="shoucang.asp?action=add&id=<%=rs2("bookid")%>" target=_blank><img src="images/ind_sc.gif" width="43" height="12" border="0" align="middle"></a></td>
</tr>
</table>
<%if (i mod 3=0) and i>=3 then%>
</tr>
<tr><td colspan=2 height=5 ></td></tr>
<%end if
rs2.movenext
loop
%>
<tr><td>
<br>
<div><font color=blue size=2>SQL类图书</font></div>
<%set rs2=server.CreateObject("adodb.recordset")
rs2.open "select * from shop_books where bookzz='章立民' and nclassid=14 order by adddate desc",conn,1,3
%>
<tr>
<%do while not rs2.eof
ii=ii+1%>
<td valign="top" bgcolor="#EEF3F9">
<TABLE align="center" cellSpacing=0 cellPadding=0 width=100% border=0>
<td vAlign=top width="15%" 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"><a href=<%=trim(rs2("bookpic"))%> target=_blank><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></A></td>
<td vAlign=top width="85%"><A class=a4
href=book.asp?id=<%=rs2("bookid")%> target=_blank><font color=#FF6600><%=trim(rs2("bookname"))%></font></A><BR>
市场价：<%=formatnumber(rs2("shichangjia"),2)&"元"%><BR>
会员价：<font color=#FF6600><%=formatnumber(rs2("huiyuanjia"),2)&"元"%></font><BR>
节 省：<%=formatnumber(round(rs2("shichangjia")-rs2("huiyuanjia"),2),2)%>元<br>
<%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/ind_gw.gif width=43 height=12 border=0 align='middle'></a>"%>
<a href="shoucang.asp?action=add&id=<%=rs2("bookid")%>" target=_blank><img src="images/ind_sc.gif" width="43" height="12" border="0" align="middle"></a></td>
</tr>
</table>
<%if (ii mod 3=0) and ii>=3 then%>
</tr>
<tr><td colspan=2 height=5 ></td></tr>
<%end if
rs2.movenext
loop
%>
</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 + -