ok.asp

电子商务系统Easy_Buy是一个在线销售系统

<!--#include file="../0.asp"--><!--#include file="../../../conn/conn.asp"-->
<%if Request("id")="" then
response.write "系统拒绝了您的操作请求"
response.end
end if%>
<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>
<link href="../../../css/css.css" rel="stylesheet" type="text/css">

<table width="650" height="50" border="0" align="center" cellpadding="0" cellspacing="0" id=ads style="DISPLAY: ">
  <form name="form2" method="post" action=""><tr> 
      <td align="center" valign="middle"> 
        <OBJECT id=WebBrowser classid=CLSID:8856F961-340A-11D0-A96B-00C04FD705A2 height=0 width=0>
        </OBJECT> 
        <input type=button class="go-wenbenkuang"  onClick="return checkQty(this.form);" 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=打印预览>
        <input name="button" type=button class="go-wenbenkuang"  onclick="javascript:window.history.go(-1)" value=返回上页> 
      </td>
    </tr></form>
  </table>

<table 
        width="650" border=0 align="center" cellpadding=3 cellspacing=1 bgcolor=#CCCCCC class="9bang">
  <%set rs2 = conn.execute("select * from sh_sj where id="&clng(request("id"))&" order by id desc")
  set rs = conn.execute("select * from sh where sjid="&clng(request("id"))&" order by id desc")
		  if not rs.eof then %>
  <tr valign="middle" bgcolor="#FFFFFF"> 
    <td height="35" colspan="4" class="008c5e"> <div align="center"><font size="5"><u><strong><%=trim(rs2("n"))%>年<%=trim(rs2("y"))%>月<%=trim(rs2("r"))%>日送货清单列表</strong></u></font></div></td>
  </tr>
  <tbody>
    <tr bgcolor="#f1f1f1"> 
      <td width=80 class="008c5e"> <div align="center"><font size="3">订单号</font></div></td>
      <td width=400 class="008c5e"> <div align="center"><font size="3">送货地址</font></div></td>
      <td width=75 class="008c5e"> <div align="center"><font size="3">收货人</font></div></td>
      <td width=150 class="008c5e"> 
        <div align="center"><font size="3">联系电话</font></div></td>
    </tr>
    <% 
While NOT rs.EOF 
%>
    <tr valign="top"> 
      <td width=80 height="18" bgcolor=#FFFFFF> <div align="center"> <font size="3"> 
          <%if rs("lx")=1 then Response.Write ("电话")%>
          <%=rs("bh")%></font></div></td>
      <td width=400 height="18" bgcolor=#ffffff> <font size="3"><%=rs("dz")%></font></td>
      <td width=75 height="18" bgcolor=#ffffff> <div align="center"><font size="3"><%=rs("name")%></font></div></td>
      <td width="150" height="18" bgcolor=#FFFFFF> <font size="3"><%=rs("tel")%></font></td>
    </tr>
    <tr> 
      <td bgcolor=#FFFFFF height="18">&nbsp;</td>
      <td height="18" colspan="3" valign="top" bgcolor=#ffffff><font size="3">备注：<%=rs("bz")%></font></td>
    </tr>
    <%  
    rs.MoveNext()
Wend
end if %>
  </tbody>
</table>