<!--#include file="../utf-8.asp" -->
<!--#include file="../js/Function.asp" -->
<!--#include file="../../inc/Function.asp" -->
<!--#include file="../../user/userSystem.asp" -->
<!--#include file="../CheckAdmin.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<META NAME="copyright" CONTENT="Copyright 2010-2012 - yidacms.com" />
<META NAME="Author" CONTENT="世纪伟成  yidacms.com" />
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<link href="../js/admin.css" rel="stylesheet" type="text/css">
<title>订单列表！</title>
</head>
<body>
		<%

		'版权：世纪伟成(http://yidacms.com)
		'本信息不会影响您网站的正常访问，无论免费用户或是收费用户请保留这里的信息.
		'如果您删除了这里的版权信息,将追究法律责任.
		dim rs,sql : yidacms_id = cint(Request("id"))
		set rs = server.createobject("adodb.recordset")
		sql="select * from shuaiweb_buy WHERE id= "&yidacms_id&""
		rs.open sql,dbok,1,1
                shijian=FormatDate(rs("time"),4)
                usermailbuy = rs("shuaiweb_useremailbuy")
                if rs("shuaiweb_content") = "" then
                 conter_1 = "没有留言哦!"
                  else
                 conter_1 = rs("shuaiweb_content")
                end if
                if request("shuaiweb")="add" Then 
		set rs=server.createobject("adodb.recordset")
		sql="select * from shuaiweb_buy WHERE id= "&yidacms_id&""
		rs.open sql,dbok,1,3
		rs("shuaiweb_buyamount")=trim(request.form("shuaiweb_buyamount"))
		rs("shuaiweb_buyname")=trim(request.form("shuaiweb_buyname"))
		rs("shuaiweb_buytel")=trim(request.form("shuaiweb_buytel"))
		rs("shuaiweb_buyaddress")=trim(request.form("shuaiweb_buyaddress"))
		rs("shuaiweb_content")=trim(request.form("shuaiweb_content"))
		rs("shuaiweb_buyprname")=trim(request.form("shuaiweb_buyprname"))
		rs("shuaiweb_reading")=trim(request.form("shuaiweb_reading"))
		rs("time")=trim(request.form("buytime"))
		rs.update
                if yidacms_jmailuserfa = 1 then
			if usermailbuy = "" then
       			 mailtz = ""
        		 else
                yidacms_jmail(3)
                if err.number<>0 then
                mailtz = "没有邮件发送!"
                else
                mailtz =  "并给用发送了邮件通知!"
                end if
 		 end if
                response.write "<script language=javascript> alert('已改成发货状态！\n\n"&mailtz&"');location.replace('admin_buy.asp');</script>"
                elseif yidacms_jmailuserfa = 2 then
		response.write "<script language=javascript> alert('已改成发货状态！');location.replace('admin_buy.asp');</script>"
		End If
                	end if
                %>
<table width="98%" border="0" cellpadding="10" cellspacing="0" bordercolor="#666666" style="border-collapse:collapse; font-size:12px;" bgcolor="#FFFFFF">
<form id="form1" name="form1" method="post" action="admin_buydetails.asp?shuaiweb=add&id=<%=rs("id")%>">
  <tr>
    <td>会员账户: 
    <%
     if usermailbuy = "" then
     yidacms_buyname = "游客身份"
     else
     yidacms_buyname = usermailbuy
     end if
     response.write yidacms_buyname
    %>
    </td>
  </tr>
  <tr>
    <td>订单号 : <%=rs("shuaiweb_buyNumber")%></td>
  </tr>
  <tr>
    <td>订购产品 : <%=rs("shuaiweb_buyprname")%></td>
  </tr>
  <tr>
    <td>订购数量 : <%=rs("shuaiweb_buyamount")%></td>
  </tr>
  <tr>
    <td>订购人 : <%=rs("shuaiweb_buyname")%></td>
  </tr>
  <tr>
    <td>联系电话 : <%=rs("shuaiweb_buytel")%></td>
  </tr>
  <tr>
    <td>地址 : <%=rs("shuaiweb_buyaddress")%></td>
  </tr>
  <tr>
    <td><font color="#ff0000">申请时间 : <%=FormatDate(rs("time"),4)%></font></td>
  </tr>
  <tr>
    <td>客户留言:<br /><%=conter_1%></td>
  </tr>
  <tr>
     <input type="hidden" name="shuaiweb_reading" id="shuaiweb_reading" value="1" />
     <input type="hidden" name="shuaiweb_buyprname" id="shuaiweb_buyprname" value="<%=rs("shuaiweb_buyprname")%>" />
     <input type="hidden" name="shuaiweb_buyamount" id="shuaiweb_buyamount" value="<%=rs("shuaiweb_buyamount")%>" />
     <input type="hidden" name="shuaiweb_buyname" id="shuaiweb_buyname" value="<%=rs("shuaiweb_buyname")%>" />
     <input type="hidden" name="shuaiweb_buytel" id="shuaiweb_buytel" value="<%=rs("shuaiweb_buytel")%>" />
     <input type="hidden" name="shuaiweb_buyaddress" id="shuaiweb_buyaddress" value="<%=rs("shuaiweb_buyaddress")%>" />
     <input type="hidden" name="shuaiweb_content" id="shuaiweb_content" value="<%=rs("shuaiweb_content")%>" />
     <input type="hidden" name="buytime" id="buytime" value="<%=now()%>" />

    <td>
<input type="submit" name="Submit" value="确认发货" class="inanniu"/> 
<input type=button onclick="window.location.href('admin_buy.asp')"value="返 回" class="inanniu">
</td>
  </tr>
<%
                rs.Close
                set rs=nothing
%>
</form>
</table>
</body>
</html>
