📄 index1.asp
字号:
<td width="151" height="20"><div align="center"><img src="images/guanzhux.gif" width="151" height="20"></div></td>
</tr><%i=0
do while not rs.eof%>
<tr>
<td><%response.write "<a href=book.asp?id="&rs("bookid")&" target=_blank>"
if len(trim(rs("bookname")))>14 then
response.write left(trim(rs("bookname")),12)&"..."
else
response.write trim(rs("bookname"))
end if
response.write "</a>"
%></td>
</tr>
<tr>
<td height="1" background="images/ppb.gif"></td>
</tr><%i=i+1
if i>=10 then exit do
rs.movenext
loop
rs.close
set rs=nothing%>
<tr>
<td><div align="right">更多排行>></div></td>
</tr>
<tr>
<td height="1" background="images/ppb.gif"></td>
</tr>
</table></td>
<td width="50%" valign="top">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 10 bookid,bookname from shop_books order by chengjiaocount desc",conn,1,1%>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="1">
<tr>
<td height="2"></td>
</tr>
<tr>
<td width="151" height="20"><div align="center"><img src="images/xiaoshoux.gif" width="151" height="20"></div></td>
</tr>
<%i=0
do while not rs.eof%>
<tr>
<td>
<%response.write "<a href=book.asp?id="&rs("bookid")&" target=_blank>"
if len(trim(rs("bookname")))>14 then
response.write left(trim(rs("bookname")),12)&"..."
else
response.write trim(rs("bookname"))
end if
response.write "</a>"
%>
</td>
</tr>
<tr>
<td height="1" background="images/ppb.gif"></td>
</tr>
<%i=i+1
if i>=10 then exit do
rs.movenext
loop
rs.close
set rs=nothing%>
<tr>
<td><div align="right">更多排行>></div></td>
</tr>
<tr>
<td height="1" background="images/ppb.gif"></td>
</tr>
</table> </td>
</tr>
</table></td>
</tr>
</table>
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="214" height="11"><IMG height=11 src="images/sleft1.gif" width=117></td>
<td height="11" colspan="2"><div align="right"><IMG height=11 src="images/sright1.gif"
width=82></div></td>
</tr>
<tr>
<td height="149" valign="top"><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR bgcolor="#F2F8FF">
<TD colSpan=2 vAlign=top><IMG height=25 src="images/sleftc.gif"
width=89></TD>
</TR>
<TR>
<TD vAlign=top width="6%"><IMG height=124
src="images/scenter1.gif" width=17></TD>
<TD width="94%" valign="top" bgcolor="#F2F8FF">
<%
set rs=server.CreateObject("adodb.recordset")
i=0
rs.open "select top 8 bookid,dazhe,bookname from shop_books where dazhe<=0.6 order by adddate desc",conn,1,1
rs.absoluteposition=3
do while not rs.eof
i=i+1
if len(trim(rs("bookname")))>14 then
response.write "·<a href=book.asp?id="&rs("bookid")&" target=_blank>"&left(trim(rs("bookname")),12)&"...</a> <font color=#FF6600>"&rs("dazhe")*100&"%</font><br>"
else
response.write "·<a href=book.asp?id="&rs("bookid")&" target=_blank>"&trim(rs("bookname"))&"</a> <font color=#FF6600>"&rs("dazhe")*100&"%</font><br>"
end if
if i>=6 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</TD>
</TR>
</TBODY>
</TABLE></td>
<td width="500" valign="top" bgcolor="#F2F8FF"><TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD vAlign=top width="50%">
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select top 2 bookid,bookcontent,dazhe,shichangjia,huiyuanjia,bookname,bookpic from shop_books where dazhe<=0.6 order by adddate desc",conn,1,1%>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=103 hspace=5 src="images/bg_book.gif"
width=71 vspace=5 border=0> <P style="MARGIN-TOP: -112px"><A
href=book.asp?id=<%=rs("bookid")%> target=_blank><IMG
height=96 alt=图书封面 hspace=5 src="<%if trim(rs("bookpic"))="" then
response.write "images/emptybook.gif"
else
response.write trim(rs("bookpic"))
end if%>"
width=65 vspace=3 border=0></A>
<P style="MARGIN-TOP: -50px" align=right> </P></TD>
<TD valign="top"><A href=book.asp?id=<%=rs("bookid")%> target=_blank><font size="2" color=#FF6600><%=trim(rs("bookname"))%></font></A>
<BR>
<%if trim(rs("bookcontent"))<>"" then
if len(trim(rs("bookcontent")))> 58 then
response.write left(trim(rs("bookcontent")),56)&"..."
else
response.write left(trim(rs("bookcontent")))
end if
end if%>
</TD>
</TR>
<TR>
<TD colSpan=2> <DIV align=center>市场价：<%=formatnumber(rs("shichangjia"),2)%> 会员价：<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)%></font>
<INPUT style="BORDER-RIGHT: #000000 1px solid; BACKGROUND-POSITION: 0% 50%; BORDER-TOP: #000000 1px solid; FONT-WEIGHT: normal; FONT-SIZE: 12px; BACKGROUND-ATTACHMENT: scroll; BORDER-LEFT: #000000 1px solid; COLOR: #000000; LINE-HEIGHT: normal; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-REPEAT: repeat; FONT-STYLE: normal; HEIGHT: 16px; BACKGROUND-COLOR: #ffdb29; FONT-VARIANT: normal" onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type=button value=购买 name=Submit222>
</DIV></TD>
</TR>
</TBODY>
</TABLE></TD>
<TD vAlign=top width="50%">
<%rs.movenext%>
<TABLE cellSpacing=0 cellPadding=2 width="100%" border=0>
<TBODY>
<TR>
<TD><IMG height=103 hspace=5 src="images/bg_book.gif"
width=71 vspace=5 border=0> <P style="MARGIN-TOP: -112px"><A
href=book.asp?id=<%=rs("bookid")%> target=_blank><IMG
height=96 alt=图书封面 hspace=5 src="<%if trim(rs("bookpic"))="" then
response.write "images/emptybook.gif"
else
response.write trim(rs("bookpic"))
end if%>"
width=65 vspace=3 border=0></A>
<P style="MARGIN-TOP: -50px" align=right> </P></TD>
<TD valign="top"><A
href=book.asp?id=<%=rs("bookid")%> target=_blank><font size="2" color=#FF6600><%=trim(rs("bookname"))%></font></A>
<BR>
<%if trim(rs("bookcontent"))<>"" then
if len(trim(rs("bookcontent")))> 58 then
response.write left(trim(rs("bookcontent")),56)&"..."
else
response.write left(trim(rs("bookcontent")))
end if
end if%>
</TD>
</TR>
<TR>
<TD colSpan=2> <DIV align=center>市场价：<%=formatnumber(rs("shichangjia"),2)%> 会员价：<font color=#FF6600><%=formatnumber(rs("huiyuanjia"),2)%></font>
<INPUT style="BORDER-RIGHT: #000000 1px solid; BACKGROUND-POSITION: 0% 50%; BORDER-TOP: #000000 1px solid; FONT-WEIGHT: normal; FONT-SIZE: 12px; BACKGROUND-ATTACHMENT: scroll; BORDER-LEFT: #000000 1px solid; COLOR: #000000; LINE-HEIGHT: normal; BORDER-BOTTOM: #000000 1px solid; BACKGROUND-REPEAT: repeat; FONT-STYLE: normal; HEIGHT: 16px; BACKGROUND-COLOR: #ffdb29; FONT-VARIANT: normal" onClick="javascript:window.open('shopping.asp?id=<%=rs("bookid")%> ','','width=632,height=388,toolbar=no, status=no, menubar=no, resizable=yes, scrollbars=yes');return false;" type=button value=购买 name=Submit2222>
</DIV></TD>
</TR>
</TBODY>
<%rs.close
set rs=nothing%>
</TABLE></TD>
</TR>
</TBODY>
</TABLE></td>
<td width="62" bgcolor="#F2F8FF"><A
href="class.asp"><IMG height=149
alt=更多的特价图书 src="images/scenter2.gif" width=61 border=0></A></td>
</tr>
<tr>
<td height="10"><IMG height=10 src="images/sleft2.gif" width=48></td>
<td height="10" colspan="2"><div align="right"><IMG height=10 src="images/sright2.gif"
width=61></div></td>
</tr>
</table>
<!--#include file="service.asp"-->
<!--#include file="copyright.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -