orderfind.asp

诚信商店系统源代码

<!--#include file="title.asp"--><meta name=keywords content="诚信商店,血饮狂刀,Clanboo,lanboo,金统联,[e-mail],jsbuy.com,cebuy.com,王星亮,完美商店,超级商店,商城,冷面">
<%
wxl=request("wxl")
if wxl="Add" then
	OrderID=trim(request("OrderID"))
	if OrderID="" then Back("订单号不能为空！")
	ShowContent
else
	ShowFind
end if

sub ShowFind()
%>

      <TABLE WIDTH=400 BORDER=0 CELLPADDING=0 CELLSPACING=0 align=center>
        <TR> 
          <TD width="9"> <IMG SRC="images/t5_01.gif" WIDTH=9 HEIGHT=11 ALT=""></TD>
          <TD background="images/t5_02a.gif"> <IMG SRC="images/t5_02a.gif" WIDTH=1 HEIGHT=11 ALT=""></TD>
          <TD width="9"> <IMG SRC="images/t5_03.gif" WIDTH=9 HEIGHT=11 ALT=""></TD>
        </TR>
        <TR> 
          <TD> <IMG SRC="images/t5_04.gif" WIDTH=9 HEIGHT=21 ALT=""></TD>
          <TD background="images/1a.gif" align=center> &nbsp;<span class="cn2">订单查询</span></TD>
          <TD> <IMG SRC="images/t5_06.gif" WIDTH=9 HEIGHT=21 ALT=""></TD>
        </TR>
        <TR> 
          <TD background="images/1c.gif"> <IMG SRC="images/1c.gif" WIDTH=9 HEIGHT=1 ALT=""></TD>
          <TD valign="top"><FORM METHOD=POST ACTION="<%=UrlFile%>?wxl=Add">
			<table width="100%" border="0" FRAME="vsides" cellpadding="0" cellspacing="1" bgcolor="#E1E1E1">
<!--列表--><tr bgcolor=#ffffff><td>请输入要查询的订单号：<input type='text' name='OrderID' value='' size=30></td></tr>
			<tr bgcolor=#ffffff align=center><td><input type='submit' name='submit' value='    查    询    '></td></tr>
            </form></table></TD>
          <TD background="images/2c.gif"> <IMG SRC="images/2c.gif" WIDTH=9 HEIGHT=8 ALT=""></TD>
        </TR>
        <TR> 
          <TD> <IMG SRC="images/t5_10.gif" WIDTH=9 HEIGHT=9 ALT=""></TD>
          <TD background="images/t5_11a.gif"> <IMG SRC="images/t5_11a.gif" WIDTH=1 HEIGHT=9 ALT=""></TD>
          <TD> <IMG SRC="images/t5_12.gif" WIDTH=9 HEIGHT=9 ALT=""></TD>
        </TR>
      </TABLE>

<%

end sub

sub ShowContent()
 Query="select * from web_Order where OrderID='"&OrderID&"'"
 sql.open Query,conn,1,1
 if sql.eof then Back("未找到相关订单，请确认订单号是否正确！")
%>

<table border="1" width="650" cellpadding="3" cellspacing="0" bgcolor="#D6D3CE" bordercolordark="#FFFFFF" bordercolorlight="#808080" align="center" >
  <tr > 
    <td colspan="2" nowrap><font face="Wingdings 3"><b>a</b></font> 
      <font color="#660033"> 订单详细资料……</font></td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">订单号</div>
    </td>
    <td width="88%"><%=sql("OrderID")%></td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">客户帐号</div>
    </td>
    <td width="88%"><%=sql("memberID")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">收货人姓名</div>
    </td>
    <td width="88%"><%=sql("customerName")%> &nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">收货人地址</div>
    </td>
    <td width="88%"><%=sql("address")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">邮政编码</div>
    </td>
    <td width="88%"><%=sql("code")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">联系电话</div>
    </td>
    <td width="88%"><%=sql("phone")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">电子邮件</div>
    </td>
    <td width="88%"><%=sql("email")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">付款方式</div>
    </td>
    <td width="88%"><%=sql("payment")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">备注</div>
    </td>
    <td width="88%"><%=sql("remark")%>&nbsp;</td>
  </tr>
  <tr> 
    <td width="12%" nowrap> 
      <div align="right">订货日期</div>
    </td>
    <td width="88%"><%=sql("createDate")%>&nbsp;</td>
  </tr>
  <tr > 
    <td colspan="2" nowrap><font face="Wingdings 3"><b><font color="#000000">a</font></b></font> 
      <font color="#660033">订货商品明细……</font></td>
  </tr>
  <tr>
	<td colspan=2>

<table width="98%" border="0" bgcolor=#dddddd cellspacing="1" cellpadding="2" align="center">
  <tr> 
    <td width="8%" nowrap> 
      <div align="center">商品编号</div>
    </td>
    <td width="49%" nowrap> 
      <div align="center">商品名称</div>
    </td>
    <td width="14%" nowrap> 
      <div align="center">商品价格</div>
    </td>
    <td width="13%" nowrap> 
      <div align="center">商品数量</div>
    </td>
    <td width="16%" nowrap> 
      <div align="center">金额小计</div>
    </td>
  </tr>
<%
set tmpSql=conn.execute("select * from web_OrderDetail where orderID='"&orderID&"'")
while not tmpSql.eof
i=i+tmpSql("quantity")*tmpSql("price")
%>
  <tr bgcolor=#ffffff> 
    <td width="8%" nowrap> 
      <div align="center"><%=tmpSql("productID")%></div>
    </td>
    <td width="49%" nowrap> 
      <div align="center"><%=tmpSql("productName")%></div>
    </td>
    <td width="14%" nowrap> 
      <div align="center"><%=tmpSql("price")%></div>
    </td>
    <td width="13%" nowrap> 
      <div align="center"><%=tmpSql("quantity")%></div>
    </td>
    <td width="16%" nowrap> 
      <div align="center"><%=tmpSql("quantity")*tmpSql("price")%></div>
    </td>
  </tr>
<%
	tmpSql.movenext
wend
%>  
  <tr> 
    <td colspan="5"> 
      <div align="right">总计金额：<%=i%>元&nbsp;&nbsp;&nbsp;</div>
    </td>
  </tr>
</table>
  <table width="98%" border="0" bgcolor=#ffffff cellspacing="0" cellpadding="2" align="center">
  <tr>
      <td width="7%" nowrap> 
        <div align="right">发货备注</div>
    </td>
      <td width="93%"><%=sql("treatedRemark")%></td>
  </tr>
  <tr>
      <td width="7%" nowrap> 
        <div align="right">发货日期</div>
    </td>
      <td width="93%"><%=sql("treatedDate")%></td>
  </tr>
</form>
</table>
</td>
</tr>
</table>
<%
end sub

%>
<br>
<table width="100%" border="0" cellspacing="2" bgcolor="#EAEAEA">
  <tr>
    <td align="center" class="en1">&copy;Copyright 2002-2003 <a href="nortar.com">NORTAR.com</a> 
      All Rights Reserved </td>
  </tr>
</table>
<p>&nbsp;</p>
</body>
</html>