gusucode.com > asp+SQLServer网上书店系统设计(源代码+论文) > asp+SQLServer网上书店系统设计(源代码+论文)\网上书店asp+SQLServer\网上书店\main1.asp

    <!--#include file="conn.asp"-->
<script language=javascript>
function openbag(id) {   
window.open("eshop1.asp?cpbm="+id,"","height=400,width=630,left=200,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");
 }
function openurl(id) {   
window.open("bookpart.asp?book_ID="+id,"","height=430 width=630,left=200,top=0,resizable=yes,scrollbars=yes,status=no,toolbar=no,menubar=no,location=no");}
</script>
<html>
<head>
<title>网上书城</title>
</head>
<body bgcolor="#ffffff" align="center">
<%
  set rs=server.createobject("adodb.recordset")
  cn_str="select top 8 * from book order by Look_Count desc"
  rs.open cn_str,cn,1,1
%>
<font size=3 color="#000000" > 畅销书籍:</font>
<hr color=lightblue>
<table border="0" cellpadding="0" cellspacing="0" width="100%"  height="50">
<% row_count=1 %>          
<tr> 
<%  While Not rs.EOF%>
<%ID=trim(rs("ID"))%>
<td height="1" align="center" valign="bottom" width="200">
<img border="0" src="<%=rs("book_pic1")%>"> <span style="font-size: 9pt">
<br></span><b><font style="font-size: 9pt" >[书名]:<%=rs("book_name")%>
<br>[市场价格]:<strike><%=rs("book_price1")%>元</strike> 
<br></font><font color="#FF0000" style="font-size: 9pt">[会员价格]:<%=rs("book_price2")%></font><font style="font-size: 9pt">&nbsp;&nbsp; 
<br>浏览次数:<%=rs("Look_Count")%>
<br><a href='javascript:openurl(<%=ID%>)'>[详细介绍]</a>
<br><a href='javascript:openbag(<%=ID%>)'>
<img border="0" src="images/mybuy.gif"></a></font><font size="2"> </font>
<hr size="1" color="#808000" width="80%">
</td>          
<% if row_count mod 4 =0 then%>
</tr><tr>
<%end if%>                                    
<%                          
  rs.MoveNext   
  row_count=row_count+1 
  wend  
rs.close 
%>                                                                            </tr>                                      
</table> 
<br>
<%
  set rs1=server.createobject("adodb.recordset")
  str="select top 8 * from book order by book_date desc"
  rs1.open str,cn,1,1
%>
<font size=3 color="#000000" >新书推荐:</font>
<hr color=lightblue>
<table border="0" cellpadding="0" cellspacing="0" width="100%"  height="50">
<% row_count1=1 %>          
<tr> 
<%  While Not rs1.EOF%>
<%ID1=trim(rs1("ID"))%>
<td height="1" align="center" valign="bottom" width="200">
<img border="0" src="<%=rs1("book_pic1")%>">
<br><b><font style="font-size: 9pt">[书名]:<%=rs1("book_name")%></font><span style="font-size: 9pt">
<br></span><font style="font-size: 9pt" >[市场价格]:<strike><%=rs1("book_price1")%>元</strike> </font> 
<span style="font-size: 9pt"> 
<br></span><font color="#FF0000" style="font-size: 9pt">[会员价格]:<%=rs1("book_price2")%></font><span style="font-size: 9pt">&nbsp;&nbsp; 
<br></span><font style="font-size: 9pt" >浏览次数:<%=rs1("Look_Count")%></font><span style="font-size: 9pt">
<br></span><font style="font-size: 9pt">
<a href='javascript:openurl(<%=ID1%>)'>[详细介绍]</a></font><span style="font-size: 9pt">
<br><a href='javascript:openbag(<%=ID1%>)'>
<img border="0" src="images/mybuy.gif"></a> </span>
<hr size="1" color="#808000" width="80%">
</td>          
<% if row_count1 mod 4 =0 then%>
</tr><tr>
<%end if%>                                    
<%                          
  rs1.MoveNext   
  row_count1=row_count1+1 
  wend  
rs1.close 
%>                                                                            </tr>                                      
</table>
</body>
</html>