<%@ LANGUAGE = VBScript.Encode %>
<!-- #include virtual = "/include/myopen.asp" -->
<%
	set RS = Server.CreateObject("ADODB.RecordSet")
	set RS1 = Server.CreateObject("ADODB.RecordSet")
	set RS2 = Server.CreateObject("ADODB.RecordSet")
%>
<%'判断用户是否登陆过
	IF Request.Cookies ("Admin_name") = "" OR Request.Cookies ("Admin_Pass") ="" THEN
	'没有登陆
	Response.Redirect ("/manage/Admin_Login.ASP")
	END IF
	IF REQUEST("HOME") <> "" THEN
	Response.Redirect ("/manage/default.asp")
	END IF

	DIM LK(500)
'删除
IF REQUEST("DEL") <> "" THEN
	PageNo = Request("PageNo1")
	CAOZUO = TRIM(REQUEST("CAOZUO"))
	POP = INSTR(CAOZUO,",")
		I = 0
		WHILE POP >0
			LK(I) = TRIM(MID(CAOZUO,1,POP-1))
			CAOZUO = TRIM(MID(CAOZUO,POP+1))
			POP=INSTR(CAOZUO,",")
			I = I + 1
		WEND
		LK(I)=TRIM(MID(CAOZUO,1))
	FOR J = 0 TO I
	'删除记录
				SQL = "DELETE * FROM FAST_ORDER WHERE ORDER_NO = '" & LK(J) & "'"
				CONN.Execute (SQL)
		
	NEXT
	Response.Redirect ("fast_order.asp")

END IF
		SQL = "SELECT * FROM FAST_ORDER WHERE ORDER_NO <> ''"
		RS.Open SQL,CONN,adOpenKeyset ,adLockReadOnly
		IF RS.RecorCAH@#@&MNYAAA==^#~@%>
<script language="javascript">
var lsdz = "";
function checkin()
{    
   if(confirm("你现在真的要删除您选择的记录吗?"))
      return true
   else
      return false;
}
</script>
<script language="javascript">
var lsdz = "";
function checkout()
{    
   if(confirm("这些定单编号将被确认！客户可以在网上查询其定单的付款情况"))
      return true
   else
      return false;
}
</script>
<html>
<head>
<title>订单查询结果</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
.height {  line-height: 0.5pt}
td {  }
.word {  font-size: 9pt; color: #FFFFFF}
a:hover {  color: #CCFFCC; text-decoration: underline}
a {  text-decoration: none; color: #000066}
.border {  border-color: black #FF3300 black black; border-style: solid; border-top-width: 0px; border-right-width: 1px; border-bottom-width: 0px; border-left-width: 0px}
-->
</style>
</head>

<body bgcolor="#FFFFFF">
<div align="center">订 单 明 细 </div>
<form method="post" action="fast_order.asp">
  <table width="750" border="1" cellspacing="0" cellpadding="1" align="center" bordercolorlight="#66CCFF" bordercolordark="#FFFFFF" bgcolor="#DFEFFF">
    <tr bgcolor="#99CCFF"> 
      <td width="46" class="word" height="23"> 
        <div align="center"><font color="#000000">选择</font> </div>
      </td>
      <td width="110" class="word" height="23"> 
        <div align="center"><font color="#000000">订单号</font></div>
      </td>
      <td width="95" class="word" height="23"> 
        <div align="center"><font color="#000000">用户名</font></div>
      </td>
      <td width="83" class="word" height="23"> 
        <div align="center"><font color="#000000">联系电话</font></div>
      </td>
      <td width="91" class="word" height="23"> 
        <div align="center"><font color="#000000">商品名称 </font></div>
      </td>
      <td width="95" class="word" height="23"> 
        <div align="center"><font color="#000000">邮件地址</font></div>
      </td>
      <td width="95" class="word" height="23"> 
        <div align="center">付款</div>
      </td>
      <td width="125" class="word" height="23">邮编</td>
      <td width="125" class="word" height="23">地址</td>
      <td width="125" class="word" height="23">送货日期</td>
      <td width="125" class="word" height="23">方式</td>
      <td width="125" class="word" height="23"> 
        <div align="center"><font color="#000000">定货日期 </font></div>
      </td>
      <td width="71" class="word" height="23"> 
        <div align="center">备注</div>
      </td>
    </tr>
    <%
    DO WHILE NOT RS.EOF 
    
    %> 
    <tr> 
      <td width="46" class="word" height="15"> 
        <div align="center"> 
          <input type="checkbox" name="caozuo" value="<%=RS("ORDER_NO")%>">
        </div>
      </td>
      <td width="110" class="word" height="15"> 
        <div align="center"><font color="#000000"><%=RS("ORDER_NO")%>&nbsp;</div>
      </td>
      <td width="95" class="word" height="15"> 
        <div align="center"><font color="#000000"><%=RS("USER_NAME")%></font>&nbsp;</div>
      </td>
      <td width="83" class="word" height="15"> 
        <div align="center"><font color="#000000"><%=RS("tel")%></font>&nbsp;</div>
      </td>
      <td width="91" class="word" height="15"> 
        <div align="center"><font color="#000000"><%=RS("name")%></font>&nbsp;</div>
      </td>
      <td class="word" width="95" height="15"> 
        <div align="center"><font color="#000000"><%=RS("EMAIL")%></font></div>
      </td>
      <td class="word" width="95" height="15"> 
        <div align="center"><font color="#000000"><%=RS("PAY_MODE")%></font>&nbsp;</div>
      </td>
      <td class="word" width="125" height="15"><font color="#000000"><%=RS("SEND_POST")%></font></td>
      <td class="word" width="125" height="15"><font color="#000000"><%=RS("SEND_ADDR")%></font></td>
      <td class="word" width="125" height="15"><font color="#000000"><%=RS("SEND_DATE")%></font></td>
      <td class="word" width="125" height="15"><font color="#000000"><%=RS("SEND_MODE")%></font></td>
      <td class="word" width="125" height="15"> 
        <div align="center"><font color="#000000"><%=RS("ORDER_DATE")%></font>&nbsp;</div>
      </td>
      <td class="word" width="71" height="15"> 
        <div align="center"><font color="#000000"><%=RS("send_desc")%></font>&nbsp;</div>
      </td>
    </tr>
    <%
		RS.MoveNext
		LOOP
		RS.Close 
    %> 
  </table>
  <div align="center">
    <input type="submit" name="del" value="订单删除" onClick="return checkin();">
    <input type="button" name="close" value="关闭窗口" onclick="self.close();">
  </div>
</form>
</body>
</html>


<%
ELSE
%>
没有记录
<%
END IF
%>