?? orderofind.asp
字號:
<%@ LANGUAGE="VBScript" %>
<!--#include file="Inc/Conn.asp" -->
<%
'OrderNum= Request.form("Form_Id")
OrderNum= Request("OrderNum")
IF Session("UserName")="" Then
response.redirect "server.asp"
Else
set Rs3 = Server.CreateObject("ADODB.recordset")
sql3="select * from OrderList where OrderNum='"&OrderNum&"'"
rs3.open sql3,conn,1,1
IF rs3.RecordCount >=1 then
IF Session("UserName")=rs3("UserName") Then
%>
<html>
<head>
<title>client indent particular information </title>
<meta name="Contact" content="www.wygk.cn 網域高科 QQ：38306293">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="mt_style.css" rel="stylesheet" type="text/css">
</head>
<%
id=Form_Id
set rs=server.createobject("adodb.recordset")
sqltext="select * from OrderList where OrderNum='"&OrderNum&"'"
rs.open sqltext,conn,1,1
%>
<body>
<br> <div align="center">
<center>
<TABLE cellSpacing=1 cellPadding=4 width=530 bgColor=#006699>
<TBODY>
<TR bgColor=#eeeeee>
<TD height="32" colSpan=2><div align="center"><font color="#000000"><strong>client indent details</strong></font></div></TD>
</TR>
<TR>
<TD width=127 bgColor=#DBDBDB height=12 align="right"><font color="#000000">indent odd numbers：</font></TD>
<TD width=402 height=12 bgcolor="#eeeeee"> <%=rs("OrderNum")%></TD>
</TR>
<TR>
<TD bgColor=#DBDBDB height=12 align="right">Company name<font color="#000000">：</font></TD>
<TD width=402 height=12 bgcolor="#eeeeee"> <%=rs("CompanyName")%></TD>
</TR>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">consignee name：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("Receiver")%></TD>
</TR>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">ReceiveAddress：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("Add")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">ZIPcode：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("Postcode")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=12 align="right"><font color="#000000">Phone：</font></TD>
<TD width=402 height=12 bgcolor="#eeeeee"> <%=rs("Phone")%></TD>
</tr>
<tr>
<TD bgColor=#DBDBDB height=12 align="right">Fax<font color="#000000">：</font></TD>
<TD width=402 height=12 bgcolor="#eeeeee"> <%=rs("Fax")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">Email：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("EMail")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">choose remit code：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("PayType")%></TD>
</tr>
<tr>
<TD width=127 height=25 align="right" bgColor=#DBDBDB><font color="#000000">remark：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%=rs("Notes")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=24 align="right"><font color="#000000">OrderDate：</font></TD>
<TD width=402 height=24 bgcolor="#eeeeee"> <%=rs("OrderTime")%></TD>
</tr>
<tr>
<TD width=127 bgColor=#DBDBDB height=25 align="right"><font color="#000000">Whether the order has already been dealt with：</font></TD>
<TD width=402 height=25 bgcolor="#eeeeee"> <%If rs("Flag")="尚未處理" Then%>
Have not dealt with yet
<%else%>
Have already delivered
<%End If%> </TD>
</tr>
<TR>
<TD height="31" colSpan=2 bgcolor="#eeeeee">
<p align="center">Order<font color="#000000">Product</font>Minutia</p></TD>
</TR>
<%
set rs2=server.createobject("adodb.recordset")
sqltext2 = "select A.Product_Id,A.OrderNum,A.ProductUnit,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="#006699" bordercolordark="#eeeeee" height="66">
<tr>
<td width="18%" bgcolor="#DBDBDB" height="21" align="center"><font color="#000000">ProductID</font></td>
<td width="27%" bgcolor="#DBDBDB" height="21" align="center"><font color="#000000">ProductName</font></td>
<td width="30%" bgcolor="#DBDBDB" height="21" align="center"><font color="#000000">ProductClass</font></td>
<td width="11%" align="center" bgcolor="#DBDBDB"><font color="#000000">ProductQuantity</font></td>
<td width="14%" height="21" align="center" bgcolor="#DBDBDB">total
</td>
</tr>
<%
Total = 0
While Not rs2.EOF
Sum=0
Sum = rs2("ProductUnit")* FormatNumber(rs2("Price"),2)
Sum = FormatNumber(Sum,2)
Total = Sum + Total
'計算總金額%>
<tr>
<td width="18%" align="center" height="22"><%=rs2("Product_Id")%></td>
<td width="27%" align="center" height="22"><%=rs2("Title")%></td>
<td width="30%" align="center" height="22"><%=rs2("BigClassName")%> => <%=rs2("SmallClassName")%></td>
<td align="center"><%=rs2("ProductUnit")%></td>
<td height="22" align="center"><%=Sum%></td>
</tr>
<%
rs2.MoveNext
Wend
%>
<tr>
<td colspan="2" height="21">
<p align="right"> </p></td>
<td height="21"><div align="right">price total money:</div></td>
<td height="21" colspan="2"><div align="right"><%=FormatNumber(Total,2)%></div></td>
</tr>
</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="Close">
</TD>
</TR>
</TABLE>
</div>
</form>
<p>
<%
Else
response.redirect "Loginsb.asp?msg=You can look over that does not belong to your order , please import your one own order symbol again!！"
End If
Else
response.redirect "Loginsb.asp?msg=The order number that you input does not exist or the form is incorrect, please input again!"
End IF
End if
rs3.close
conn.close
%>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -