<!--#include file=CONN.ASP-->
<!--#include file=../config.asp-->
<!--#include file=cookies.asp-->
<%
dim flag
flag=request.cookies("foxwww")("fox")
if flag<8 then
response.Write "<script LANGUAGE='javascript'>alert('你目前的级别不允许此操作！');history.go(-1);</script>"
response.end
end if
%>
<link href="images/fox.css" rel="stylesheet" type="text/css">
<style type=text/css>
BODY{
	margin:0px;
	FONT-SIZE: 12px;
	FONT-FAMILY: "宋体", "Verdana", "Arial", "Helvetica", "sans-serif";
	background-color: #CCCC99; 
	scrollbar-highlight-color: #CC9933; 
	scrollbar-arrow-color: #FFFFFF; 
	scrollbar-base-color: #CC9933
}
table { border:0px; }
td { font:normal 12px 宋体; }
img { vertical-align:bottom; border:0px; }
a { font:normal 12px 宋体; color:#111111; text-decoration:none; }
a:hover { color:#384780;text-decoration:underline; }
.sec_menu { border-left:2px solid #CC3300; border-right:2px solid #CC3300; border-bottom:2px solid #CC3300; overflow:hidden; background:#ffffff; }
.menu_title {background-color: #335EA8;color: white;font-size: 12px;font-weight:bold;height: 25; }
.menu_title span { position:relative; top:2px; left:8px; color:#FFFF00; font-weight:bold; }
.menu_title2 {background-color: #335EA8;color: white;font-size: 12px;font-weight:bold;height: 25; }
.menu_title2 span { position:relative; top:2px; left:8px; color:#FEFEFE; font-weight:bold; }
input,select,Textarea{
font-family:宋体,Verdana, Arial, Helvetica, sans-serif; font-size: 12px;}
</style>
<%
dim ts,rsbo,sqlbo
dim ThisPage,Pagesize,Allrecord,Allpage,tj
ts=trim(request("ts"))
if request("page")="" then
  ThisPage=1		
else
  ThisPage=request("page")
end if
%>
<table border="0" width="100%" id="table3" cellspacing="1">
						<tr>
							<td bgcolor="#CC3300" height="40" width="30%" align="center">
							<p align="center">
							<font color="#FFFFFF">&nbsp;</font><b><a href="alldan.asp?ts=4"><span style="text-decoration: none"><font color="#FFFFFF">投诉订单</font></span></a></b></td>
							<td bgcolor="#CC3300" height="40" width="23%" align="center">
							<b><a href="alldan.asp?ts=1"><span style="text-decoration: none">
							<font color="#FFFFFF">未提交订单</font></span></a></b></td>
							<td bgcolor="#CC3300" height="40" width="26%" align="center">
							<font color="#FFFFFF">&nbsp;</font><b><a href="alldan.asp"><span style="text-decoration: none"><font color="#FFFFFF">已提交订单</font></span></a></b></td>
							<td bgcolor="#CC3300" height="40" width="19%" align="center">
							<font color="#FFFFFF">&nbsp;</font><a href="alldan.asp?ts=3"><font color="#FFFFFF">成交订单</font></a></span></b></td>
						</tr>
						<tr>
							<td bgcolor="#FFFFFF" height="40" colspan="4">
            <%
tj=1
set rsbo=server.createobject("adodb.recordset")
Select Case ts
Case "1"
sqlbo="select * from FOX_basket where yz=0 order by fbsj desc"
Case "3"
sqlbo="select * from FOX_basket where yz=3 order by fbsj desc"
Case "4"
sqlbo="select * from FOX_basket where yz=4 order by fbsj desc"
Case Else
sqlbo="select * from FOX_basket where yz=1 order by fbsj desc"
End Select
rsbo.open sqlbo,conn,1,1
rsbo.Pagesize=5
Pagesize=rsbo.Pagesize
Allrecord=rsbo.Recordcount
Allpage=rsbo.Pagecount
if ThisPage<1 then                           
ThisPage=1                           
end if
On Error Resume Next
rsbo.move (ThisPage-1)*Pagesize
if rsbo.eof then
response.write "还没有订单！"
else
%>
<table width="100%" border="0" cellpadding="0" cellspacing="0" bordercolor="#C0C0C0" style="border-collapse: collapse" id="table169">

            <%do while not rsbo.eof%>
            <tr bgcolor="#CCCCCC">
              <td colspan="4" height="1"></td>
            </tr> 
                       <tr valign="middle" bgcolor="#F7F7F7">
              <td height="35" colspan="2" class="p10t" bgcolor="#D9EBE5">
				<p align="center">
				<a href="dandel.asp?id=<%=rsbo("id")%>">删除</a></td>
              <td height="35" colspan="2" class="p10t" bgcolor="#D9EBE5"><strong style="font-weight: 400"><font color="#cc0000"> &nbsp;</font><font color="#CC0000">订单号：</font><font color="#009933"><b><%=rsbo("dxxid")%></b></font></strong>&nbsp;&nbsp;发布时间：<font color="#666666"><%=rsbo("fbsj")%></font></td>
            </tr>

            <tr>
              <td height="22" width="4%" class="p9t" bgcolor="#F5F5F5">
				<p align="right">
				　</td>
              <td height="22" class="p9t" bgcolor="#F5F5F5" colspan="2">
				商品名称：</td>
              <td height="22" width="80%" class="index_bk2"><%=rsbo("company")%>
 </td>
            </tr>

            <tr>
              <td height="22" width="4%" class="p9t" bgcolor="#F5F5F5">
				<p style="margin-top: 0; margin-bottom: 0" align="right"> 
				<font color="#009933">
				&nbsp; </font></td>
              <td height="22" class="p9t" bgcolor="#F5F5F5" colspan="2">
				<font color="#009933">联系方式：</font></td>
              <td height="22" width="80%" class="index_bk2">
				　<%=rsbo("dizhi")%>（<%=rsbo("code")%>）</td>
            </tr>
            <tr>
              <td height="22" width="4%" class="p9t" bgcolor="#F5F5F5">
				　</td>
              <td height="22" class="p9t" bgcolor="#F5F5F5" colspan="2">
				可收款：</td>
              <td height="22" width="80%" class="p9t"><font color="#FF0000"><%=rsbo("jiages")*rsbo("shuliang")%></font>元&nbsp;&nbsp;&nbsp;
				电话：<%=rsbo("usertel")%></td>
            </tr>
            <tr>
              <td height="22" width="4%" class="p9t" bgcolor="#F5F5F5">
				　</td>
              <td height="22" class="p9t" bgcolor="#F5F5F5" colspan="2">
				说明：</td>
              <td height="22" width="80%" class="p9t">
				　<%=rsbo("memo")%></td>
            </tr>            
            <tr>
              <td height="22" width="4%" class="p9t" bgcolor="#F5F5F5">
				　</td>
              <td height="22" class="p9t" bgcolor="#F5F5F5" colspan="2">
				订单方向：</td>
              <td height="22" width="80%" class="p9t">
				<a href="user_gll.asp?username=<%=rsbo("username")%>"><%=rsbo("username")%></a> 向<a href="user_gll.asp?username=<%=rsbo("toname")%>"><%=rsbo("toname")%></a>下的订单</td>
            </tr>            <%
        tj=tj+1
        if tj>=Pagesize then exit do
        rsbo.movenext
        loop
        %>

            </table>

				<table width="100%" border="0" cellpadding="0" cellspacing="0" bordercolor="#111111" style="border-collapse: collapse" id="table170">
                <tr>
                  <td height="25" width="151" class="p9t"><p align="center"> 共有&nbsp;<font color="#CC5200"><%=Allrecord%></font>&nbsp;条记录</td>
                  <td height="25" width="126" class="p9t"><p align="center">共 <font color="#CC5200"><%=Allpage%></font> 页</td>
                  <td height="25" width="118" class="p9t"><p align="center">现在是第 <font color="#CC5200"><%=ThisPage%></font> 页</td>
                  <td height="25" width="187" class="p9t"><p align="center">
 <%
if ThisPage<2 then     
response.write "<font color=""#808080"">首页</font>&nbsp;"
response.write "<font color=""#808080"">上一页</font>&nbsp;"     
else     
response.write "<a href=?page=1&ts="&ts&">首页</a>&nbsp;"
response.write "<a href=?page="&ThisPage-1&"&ts="&ts&">上一页</a>&nbsp;"     
end if
if Allpage-ThisPage<1 then     
response.write "<font color=""#808080"">下一页</font>&nbsp;"
response.write "<font color=""#808080"">尾页</font>&nbsp;"  
else     
response.write "<a href=?page="&(ThisPage+1)&"&ts="&ts&">下一页</a>&nbsp;"   
response.write "<a href=?page="&Allpage&"&ts="&ts&">尾页</a>&nbsp;"     
end if
%>  
                    </td>
                </tr>
              </table>


 <%end if
 rsbo.close
 set rsbo=nothing%>       

 </td>
						</tr>
					</table></body></html>