<%@ language="vbscript" %>
<%
page=request("page")
if page="" or Cint(page)<1 then page="1"
page=Cint(page)
%>
<title></title>
<body bgcolor="#FFFFFF">
<%
set conn = server.createobject("adodb.connection")
 conn.open "DBQ=" & server.MapPath("datebase.mdb") & ";DRIVER={Microsoft Access Driver (*.mdb)}"
set rs=conn.execute("SELECT * from goodslist order by ɽ desc")
toa=0
do until rs.eof
   toa=toa+1
   rs.movenext
loop
if page>toa then page=toa-10 
set rs=conn.execute("SELECT * from goodslist order by ɽ desc")

%> 
<table style="font-size:9pt" border=1 bgcolor=ffdddd bordercolor="#D8D8FF" cellspacing="0" width="80%" align="center">
  <tr class="f11"> 
    <td width=60 bgcolor=ddddff> 
      <div align="center">Ʒ</div>
    </td>
    <td width=61 bgcolor=ddddff> 
      <div align="center">Ʒ</div>
    </td>
    <td width=66 bgcolor=ddddff> 
      <div align="center">Ŀǰ߼</div>
    </td>
    <td width=277 bgcolor=ddddff> 
      <div align="center">ͼƬ</div>
    </td>
    <td width=125 bgcolor=ddddff align="center">ɽ</td>
    <td width=125 bgcolor=ddddff> 
      <div align="center"></div>
    </td>
    <% 
temp=0 
do while not rs.eof 
    temp=temp+1
    if temp>=page and temp<page+10 then
   %> 
  <tr class="f11"> 
    <td width="60"> 
      <div align="center"><a><% =rs("Ʒ") %></a></div>
    </td>
    <td width="61" align="center"><% =rs("Ʒ") %></td>
    <td width="66"> 
      <div align="center"><%
          idname=rs("id")
          set price=conn.execute("select * from onsell where id='" & idname & "' order by м desc")
          if price.eof then
           %>Ŀǰûκνм<%
          else
           %><%=price("м")%><%
          end if
          
                           
   %></div>
    </td>
    <td width="277" align="center"><a href="<% =rs("ͼƬ") %>"><img src="<% =rs("ͼƬ") %>" width="80" height="54" border="1" alt="ɷŴ"></a></td>
    <td width="125" align="center"><% =rs("ɽ")%> </td>
    <td width="125" align="center">
 
    </td>
  </tr>
  <%
  end if
  rs.movenext
  loop
%> 
</table>
<hr>
<%if page>1 then %>
<a href="list.asp?page=<%=page-10%>">һҳ</a><%
end if
if page+10<=toa then %>
<a href="list.asp?page=<%=page+10%>">һҳ</a>
<% end if %>

</body>
</html>
