<%if request.cookies("bjx")("shjianame")="" then
response.Redirect "admin_login.asp"
response.End
end if
%>
<!--#include file="conn.asp"-->
<html>
<head>
<title>订单详细信息</title>
<script language="javascript">
<!--
function checkQty(form){
		ads.style.display = "none";
   document.all.WebBrowser.ExecWB(6,1)
   
}
-->
</script>
<script language="javascript">
<!--
function checkQtys(form){
		ads.style.display = "none";
  document.all.WebBrowser.ExecWB(6,6)
 }
-->
</script>
<script>
function showadv(){
if (document.form1.advshow.checked == true) {
		adv.style.display = "";
		ads.style.display = "";
	}else{
		adv.style.display = "none";
		
	}
}		
</script>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../../images/css.css" rel="stylesheet" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
  <%id=request("id")
set rs = conn.execute("select * from telorder where t_id="&id&"")
   t_name=rs("t_name")
   t_add=rs("t_add")
   t_tel=rs("t_tel")
   t_biaozhi=rs("t_biaozhi")
   t_date=rs("dates")
   user_name=rs("user_name")
   rmb=rs("rmb")
	'response.write goodid
	'response.write "<hr>"
	'response.write userid
	rs.close %>
  <br>
  <table width="95%" border="0" cellspacing="1" cellpadding="3" align="center" bgcolor="#CCCCCC">
    <tr> 
      <td bgcolor="#FFFF99" width="25%"> <div align="left"><font color="#009933"><b>电话订单<%=id%>详细信息</b></font></div></td>
      <td bgcolor="#F1F1F1" width="66%"><b><%=user_name%>电话中心</b></td>
    </tr>
    <tr bgcolor="#F1F1F1"> 
      <td colspan="2"> <table width="90%" align="center" bgcolor="#FFFFFF">
          <tr bgcolor="#f1f1f1" align="center"> 
            <td width="45%"><b>产品名称</b></td>
            <td width="11%"><b>市场价格</b></td>
            <td width="11%"><b>会员价格</b></td>
            <td width="11%" align="center"><b>数量</b></td>
          </tr>
          <% sqlsp="select * from telorder_goods where t_id="&id 
		     rs.open sqlsp,conn,1,1
			  if not rs.eof then 
			   pit=0
			   pit1=0
			   pit2=0			 
			  while not rs.eof 
			    leprice=rs("leprice")
				mprice=rs("mprice")
				num=rs("num")
				pit=pit+leprice*num
				pit1=pit1+mprice*num
				pit2=pit2+num
				%>
          <tr bgcolor="#f1f1f1" align="center"> 
            <td width="45%"><%=rs("gname")%></td>
            <td width="11%"><%=mprice%></td>
            <td width="11%"><%=leprice%></td>
            <td width="11%" align="center"><%=num%></td>
          </tr>
          <%rs.movenext
		  wend 
		   else 
		   response.write "没有信息"
		   end if
		   rs.close %>
          <tr bgcolor="#f1f1f1" align="center"> 
            <td><b>小　　计</b></td>
            <td><%=pit1%></td>
            <td><%=pit%></td>
            <td align="center"><%=pit2%></td>
          </tr>
          <tr bgcolor="#f1f1f1" align="center"> 
            <td colspan="4"> 
              运费：<%=rmb%>元 <font color="#FF0000">总计：</font> <%totalm=rmb+pit
			  response.write totalm
			  %>
              元（本次购物，您节省了<%=FormatNumber((pit1-pit),2)%>元） 
              <%  dot=instr(totalm,".")
              if dot>0 then 
                   grade=left(totalm,dot-1)
                  ' response.write grade
                else 
                   grade=totalm
                 '  response.write grade
                end if %> </td>
          </tr>
      </table></td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" colspan="2"> </td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" colspan="2" height="20"> <div align="center"><b>收货人信息</b></div></td>
    </tr>
    <tr> 
      <td bgcolor="#FFFFFF" colspan="2"> <table width="90%" align="center">
        <tr bgcolor="#f1f1f1"> 
          <td width="15%" align="center"><b>客户名称</b></td>
          <td width="20%" align="center"><%=t_name%></td>
          <td width="15%" align="center"><b>联系电话</b></td>
          <td colspan="3"><%=t_tel%></td>
        </tr>
        <tr bgcolor="#f1f1f1"> 
          <td width="15%" align="center"><b>送货地址</b></td>
          <td colspan="3" align="left"><%=t_add%></td>
          <td width="15%" align="center"><b>地点标志</b></td>
          <td width="15%" align="center"><%=t_biaozhi%></td>
        </tr>
      </table></td>
    </tr>
  </table>
  <hr width="90%" color=#cccccc noShade size=1>
  
<table width="80%" border="0" cellspacing="4" cellpadding="0" align="center">
  <tr> 
      
    <td colspan="3"><b></b></td>
    </tr>
    <tr valign="bottom"> 
      
    <td width="40%">客户部门：</td>
      
    <td width="30%">配送部：</td>
      
    <td width="30%">消费者：</td>
    </tr>
  </table>
<form name="form" method="post" action="">
  <table width="80%" border="0" cellspacing="0" cellpadding="0" align="center" id=ads style="DISPLAY: ">
    <tr> 
      <td align="center"><OBJECT id=WebBrowser classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 width=0>
        </OBJECT>
        <input type="hidden" name=id value=<%=id%>> <input name="Submit" type="submit" class="go-wenbenkuang" value="好,发货"> 
        <input name="Submit" type="submit" class="go-wenbenkuang" value="货已到">
        <input name="Submit" type="submit" class="go-wenbenkuang" value="返回上页">
        <input type=button class="go-wenbenkuang" onClick="return checkQtys(this.form);" value=直接打印> 
        <input type=button class="go-wenbenkuang" onclick=document.all.WebBrowser.ExecWB(8,1) value=页面设置> 
        <input type=button class="go-wenbenkuang" onclick=document.all.WebBrowser.ExecWB(7,1) value=打印预览> 
      </td>
    </tr>
  </table>
</form>
</body>
</html>
<%  oprat=request.form("submit")
    id=request.form("id")

		    
	if oprat<>"" and id<>"" then 
	   if oprat="好,发货" then 
	       sql="select istate from telorder where t_id="&id&""
           rs.open sql,conn,1,1 
             conn.Execute("update telorder set istate=1  where t_id="&id&"")			
            rs.close
           response.redirect "index.asp"
		else 
		    if oprat="货已到" then 
			sql="select istate from telorder where t_id="&id&""
           rs.open sql,conn,1,1 
             conn.Execute("update telorder set istate=2  where t_id="&id&"")			
            rs.close
           response.redirect "index.asp"
		else 
		    if oprat="返回上页" then 
			response.redirect "index.asp"
			end if
		 end if 
		end if
   	end if %>

