<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#A3BFE8">
  <tr>
    <td height="20" colspan="5" align="center" bgcolor="#E9F1F8">订单信息</td>
  </tr>
  <tr>
    <td height="20" colspan="5" align="center" bgcolor="#E9F1F8">&nbsp;</td>
  </tr>
  <tr>
  <td width="4%" height="20" align="center" bgcolor="#FFFFFF">序号</td>
    <td align="center" bgcolor="#FFFFFF">订单ID</td>
    <td align="center" bgcolor="#FFFFFF">物品ID[点击查看该物品]</td>
    <td align="center" bgcolor="#FFFFFF">订单人[点击查看该人信息]</td>
    <td width="7%" height="20" align="center" bgcolor="#FFFFFF">管理</td>
  </tr>
  <%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from cart order by c_time desc"
rs.open sql,conn,1,3
if not rs.eof and not rs.bof then 
  %>
     <%
	rs.pagesize=18
	page=clng(REQUEST.QueryString("page"))

	if page<1 then
		page=1
	end if
	if page>rs.pagecount then
		page=rs.pagecount
	end if

	rs.absolutepage=page
	i=1
	do while not rs.eof and i<=rs.pagesize
	%>
  <tr>
    <td width="4%" align="center" bgcolor="#E9F1F8"><%=i%></td>
    <td width="22%" align="center" bgcolor="#E9F1F8"><%=rs("c_id")%></td>
    <td width="22%" align="center" bgcolor="#E9F1F8"><a href="../showcp.asp?id=<%=rs("c_name")%>" target="_blank"><%=rs("c_name")%></a></td>
    <td width="22%" align="center" bgcolor="#E9F1F8"><a href="user_show.asp?tid=<%=rs("c_user")%>"><%=rs("c_user")%></a></td>
    <td height="20" align="center" bgcolor="#E9F1F8"><a href="order_del.asp?id=<%=rs("c_id")%>" onClick="return confirm('是否确定删除本记录？');">删除</a></td>
  </tr>
  <%
	rs.movenext
    	i=i+1
	loop
%>
<%else
response.Write("没有信息")
end if%>
  <tr>
    <td height="20" colspan="4" align="center" bgcolor="#E9F1F8">&nbsp;</td>
    <td height="20" align="center" bgcolor="#E9F1F8">&nbsp;</td>
  </tr>
  <tr>
    <td height="20" colspan="5" align="center" bgcolor="#E9F1F8"><div align="center">
        <% 
  if page=1 then 
  response.Write("第一页")
  else
  response.write("&nbsp;&nbsp;<a href=main.asp?adminjob=order&page=1>第一页</a>")
  end if
  
  if page=1 then 
   response.Write("&nbsp;&nbsp;上一页")
   else 
   response.Write("&nbsp;&nbsp;<a href=main.asp?adminjob=order&page="& page-1 & ">上一页</a>")
   end if
   
   if page=rs.pagecount then 
   response.Write("&nbsp;&nbsp;下一页")
   else 
   response.Write("&nbsp;&nbsp;<a href=main.asp?adminjob=order&page="& page+1 & ">下一页</a>")
   end if
   
   if page=rs.pagecount then 
   response.Write("&nbsp;&nbsp;最后一页")
   else 
   response.Write("&nbsp;&nbsp;<a href=main.asp?adminjob=order&page="& rs.pagecount & ">最后一页</a>")
   end if
   %>
&nbsp;<span class="hb">&nbsp;&nbsp;当前第
<% =page %>
页&nbsp;&nbsp;&nbsp;&nbsp;共
<% =rs.pagecount %>
页</span></div></td>
  </tr>
  <tr>
    <td height="20" colspan="5" align="center" bgcolor="#E9F1F8">&nbsp;</td>
  </tr>
</table>
<!--#include file="opennew.asp"-->