www.gusucode.com > 绿色环保工作企业网站源码程序 > Orderofind.asp
<!--#Include File="inc/Check_Sql.asp"-->
<!--#include file="inc/conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/Function.asp"-->
<%
OrderNum= Request("OrderNum")
set Rs3 = Server.CreateObject("ADODB.recordset")
sql3="select * from OrderList where OrderNum='"&OrderNum&"'"
rs3.open sql3,conn,1,1
IF rs3.RecordCount >=1 then
%>
<html>
<head>
<title>客户询价详细信息</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="mt_style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.STYLE1 {font-weight: bold}
.STYLE2 {color: #FF0000}
-->
</style>
</head>
<%
id=Form_Id
set rs=server.createobject("adodb.recordset")
sqltext="select * from OrderList where OrderNum='"&OrderNum&"'"
rs.open sqltext,conn,1,1
%>
<!-- #include file="Head.asp" -->
<body>
<TABLE class=about_body cellSpacing=0 cellPadding=0 width=968 align=center
border=0>
<TBODY>
<TR>
<TD vAlign=top><TABLE width=739 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD class=nav_title width=739><TABLE height=50 cellSpacing=0 cellPadding=0 width="100%"
border=0>
<TBODY>
<TR>
<TD width="7%"> </TD>
<TD vAlign=center width="11%">产品订购</TD>
<TD width="82%"><SPAN>Products Order </SPAN></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD class=about_ifnobg vAlign=top><TABLE style="MARGIN-LEFT: 6px" cellSpacing=0 cellPadding=0
width=729 border=0>
<TBODY>
<TR>
<TD height="205" align="center" style="PADDING-TOP: 21px"><TABLE cellSpacing=1 cellPadding=4 width=97% bgColor=#eaeaea>
<TBODY>
<TR bgColor=#eeeeee>
<TD height="37" colSpan=2 bgcolor="#FFFFFF"><div align="center"><strong>客户询价详细资料</strong></div></TD>
</TR>
<TR>
<TD width=165 bgColor=#FFFFFF height=12 align="right">询价号：</TD>
<TD width=521 height=12 bgcolor="#FFFFFF"> <%=rs("OrderNum")%></TD>
</TR>
<TR>
<TD bgColor=#FFFFFF height=12 align="right">公司名称：</TD>
<TD width=521 height=12 bgcolor="#FFFFFF"> <%=rs("CompanyName")%></TD>
</TR>
<tr>
<TD width=165 bgColor=#FFFFFF height=25 align="right">联系人：</TD>
<TD width=521 height=25 bgcolor="#FFFFFF"> <%=rs("Receiver")%></TD>
</TR>
<tr>
<TD width=165 bgColor=#FFFFFF height=25 align="right">公司地址：</TD>
<TD width=521 height=25 bgcolor="#FFFFFF"> <%=rs("Add")%></TD>
</tr>
<tr>
<TD width=165 bgColor=#FFFFFF height=12 align="right">联系电话：</TD>
<TD width=521 height=12 bgcolor="#FFFFFF"> <%=rs("Phone")%></TD>
</tr>
<tr>
<TD bgColor=#FFFFFF height=12 align="right">联系传真：</TD>
<TD width=521 height=12 bgcolor="#FFFFFF"> <%=rs("Fax")%></TD>
</tr>
<tr>
<TD width=165 bgColor=#FFFFFF height=25 align="right">电子信箱：</TD>
<TD width=521 height=25 bgcolor="#FFFFFF"> <%=rs("EMail")%></TD>
</tr>
<tr>
<TD width=165 height=25 align="right" bgColor=#FFFFFF>备注：</TD>
<TD width=521 height=25 bgcolor="#FFFFFF"> <%=rs("Notes")%></TD>
</tr>
<tr>
<TD width=165 bgColor=#FFFFFF height=24 align="right">询价日期：</TD>
<TD width=521 height=24 bgcolor="#FFFFFF"> <%=rs("OrderTime")%></TD>
</tr>
<tr>
<TD width=165 bgColor=#FFFFFF height=25 align="right">询价是否已经处理：</TD>
<TD width=521 height=25 bgcolor="#FFFFFF"> <%If rs("Flag")="Yes" Then%>
已处理
<%else%>
<font color="#FF0000"> 我们还未处理你的询价，产品价格未能显示，请稍后再查询</font>
<%End If%> </TD>
</tr>
<TR>
<TD height="31" colSpan=2 bgcolor="#FFFFFF"> <p align="center"><span class="STYLE1">产品列表</span></p></TD>
</TR>
<%
set rs2=server.createobject("adodb.recordset")
sqltext2 = "select A.Product_Id,A.OrderNum,A.ProductUnit,A.BuyPrice,C.Title,C.Price,C.BigClassName,C.SmallClassName from OrderDetail A,Product C where A.OrderNum='"&OrderNum&"' and A.Product_Id=C.Product_Id"
'sqltext2="select * from OrderDetail where OrderNum='"&OrderNum&"'"
rs2.open sqltext2,conn,1,1
%>
<TR>
<TD height="15" colSpan=2 valign="top" bgcolor="#eeeeee"> <div align="center">
<table border="1" cellpadding="0" cellspacing="0" width="100%" bordercolorlight="#cccccc" bordercolordark="#eeeeee" height="66">
<tr>
<td width="18%" bgcolor="#DBDBDB" height="21" align="center">产品编号</td>
<td width="24%" bgcolor="#DBDBDB" height="21" align="center">产品名称</td>
<td width="24%" bgcolor="#DBDBDB" align="center"><span class="STYLE2">产品价格</span></td>
<td width="34%" bgcolor="#DBDBDB" height="21" align="center">产品类别</td>
</tr>
<%
While Not rs2.EOF
'计算总金额%>
<tr>
<td width="18%" align="center" height="22"><%=rs2("Product_Id")%></td>
<td width="24%" align="center" height="22"><%=rs2("Title")%></td>
<td width="24%" align="center" height="22"><span class="STYLE2"><%=rs2("BuyPrice")%>元</span></td>
<td width="34%" align="center" height="22"><%=rs2("BigClassName")%> => <%=rs2("SmallClassName")%></td>
</tr>
<%
rs2.MoveNext
Wend
%>
</table>
</div></TD>
</TR><center>
<TR>
<TD height="25" colSpan=2 bgcolor="#eeeeee"> <p align="center">
<input name="close" type="button" id="close" onClick="javascript:window.close()" value="关闭">
</TD>
</TR>
</TABLE>
</form>
<p>
<%
Else
errmsg=errmsg+"<li>您输入的询价号不存在或格式不正确，请重新输入！</li>"
call WriteErrMsg()
End IF
rs3.close
conn.close
%></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
<table width="90%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="15"></td>
</tr>
</table></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="Foot.asp" -->
</body>
</html>