MemberOrderView.asp
上传用户:dbstep
上传日期:2022-08-06
资源大小:2803k
文件大小:5k
源码类别:

WEB源码(ASP,PHP,...)

开发平台:

ASP/ASPX

  1. <%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
  2. <% response.charset="utf-8" %>
  3. <!--#include file="../skweb/Const.asp" -->
  4. <!--#include file="../skweb/ConnSiteData.asp" -->
  5. <!--#include file="../skweb/ListSort.asp" -->
  6. <HTML>
  7. <HEAD>
  8. <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=utf-8" />
  9. </HEAD>
  10. <BODY>
  11. <%
  12. if not (session("MemName")<>"" and session("MemLogin")="Succeed") then 
  13.   response.redirect "MemberCenter.asp"
  14.   response.end
  15. end if
  16. dim ProductName,ProductNo,Amount,Remark
  17. dim mLinkman,mSex,mCompany,mAddress,mZipCode,mTelephone,mFax,mMobile,mEmail,mAddTime,ReplyContent,ReplyTime
  18. call OrderInfo() 
  19. %>
  20. <div align="center">
  21.   <table width="100%" border="0" cellspacing="0" cellpadding="0">
  22.     <tr>
  23.       <td width="30" height="20">&nbsp;</td>
  24.       <td>&nbsp;</td>
  25.       <td width="30">&nbsp;</td>
  26.     </tr>
  27.     <tr>
  28.       <td>&nbsp;</td>
  29.       <td height="40" align="center"><table width="100%" border="0" cellpadding="2" cellspacing="1" bgcolor="#D4D4D4">
  30.           <tr>
  31.             <td colspan="2" align="center" valign="top" bgcolor="#D4D4D4"><STRONG>订 单 详 细 信 息</STRONG></td>
  32.           </tr>
  33.           <tr>
  34.             <td width="100" align="center" bgcolor="#FFFFFF">预定名称</td>
  35.             <td width="484" bgcolor="#FFFFFF"><font color="red"><%=ProductName%></font></td>
  36.           </tr>
  37.           <tr>
  38.             <td align="center" bgcolor="#FFFFFF">预定编号</td>
  39.             <td bgcolor="#FFFFFF"><%=ProductNo%></td>
  40.           </tr>
  41.           <tr>
  42.             <td align="center" bgcolor="#FFFFFF">订购数量</td>
  43.             <td bgcolor="#FFFFFF"><%=Amount%></td>
  44.           </tr>
  45.           <tr>
  46.             <td align="center" bgcolor="#FFFFFF">补充说明</td>
  47.             <td bgcolor="#FFFFFF"><%=Remark%></td>
  48.           </tr>
  49.           <tr>
  50.             <td align="center" bgcolor="#FFFFFF">联&nbsp;系&nbsp;人</td>
  51.             <td bgcolor="#FFFFFF"><%=mLinkman%></td>
  52.           </tr>
  53.           <tr>
  54.             <td align="center" bgcolor="#FFFFFF">性  别</td>
  55.             <td bgcolor="#FFFFFF"><%=mSex%></td>
  56.           </tr>
  57.           <tr>
  58.             <td align="center" bgcolor="#FFFFFF">单位名称</td>
  59.             <td bgcolor="#FFFFFF"><%=mCompany%></td>
  60.           </tr>
  61.           <tr>
  62.             <td align="center" bgcolor="#FFFFFF">地  址</td>
  63.             <td bgcolor="#FFFFFF"><%=mAddress%></td>
  64.           </tr>
  65.           <tr>
  66.             <td align="center" bgcolor="#FFFFFF">邮  编</td>
  67.             <td bgcolor="#FFFFFF"><%=mZipCode%></td>
  68.           </tr>
  69.           <tr>
  70.             <td align="center" bgcolor="#FFFFFF">电  话</td>
  71.             <td bgcolor="#FFFFFF"><%=mTelephone%></td>
  72.           </tr>
  73.           <tr>
  74.             <td align="center" bgcolor="#FFFFFF">传  真</td>
  75.             <td bgcolor="#FFFFFF"><%=mFax%></td>
  76.           </tr>
  77.           <tr>
  78.             <td align="center" bgcolor="#FFFFFF">移动电话</td>
  79.             <td bgcolor="#FFFFFF"><%=mMobile%></td>
  80.           </tr>
  81.           <tr>
  82.             <td align="center" bgcolor="#FFFFFF">电子邮箱</td>
  83.             <td bgcolor="#FFFFFF"><%=mEmail%></td>
  84.           </tr>
  85.           <tr>
  86.             <td align="center" bgcolor="#FFFFFF">订购时间</td>
  87.             <td bgcolor="#FFFFFF"><%=mAddTime%></td>
  88.           </tr>
  89.           <tr>
  90.             <td align="center" bgcolor="#EBEBEB">回复时间</td>
  91.             <td bgcolor="#EBEBEB"><font color="red"><%=ReplyTime%></font></td>
  92.           </tr>
  93.           <tr>
  94.             <td align="center" bgcolor="#EBEBEB">回复内容</td>
  95.             <td bgcolor="#EBEBEB"><%=ReplyContent%></td>
  96.           </tr>
  97.       </table></td>
  98.       <td></td>
  99.       <td>&nbsp;</td>
  100.     </tr>
  101.     <tr>
  102.       <td height="30"></td>
  103.       <td align="center"><input name="button"  type="button" class="button"  onclick="javascript:window.close();"  value="关闭窗口"></td>
  104.       <td></td>
  105.     </tr>
  106.     <tr>
  107.       <td height="30"></td>
  108.       <td></td>
  109.       <td></td>
  110.     </tr>
  111.   </table>
  112. </div>
  113. <%
  114. sub OrderInfo()
  115.   dim rs,sql
  116.   set rs = server.createobject("adodb.recordset")
  117.   sql="select * from sk_Order where ID="&request.QueryString("ID")
  118.   rs.open sql,conn,1,1
  119.   ProductName=rs("ProductName")
  120.   ProductNo=rs("ProductNo")
  121.   Amount=rs("Amount")
  122.   Remark=HtmlStrReplace(rs("Remark"))
  123.   mLinkman=rs("Linkman")
  124.   mSex=rs("Sex")
  125.   mCompany=rs("Company")
  126.   mAddress=rs("Address")
  127.   mZipCode=rs("ZipCode")
  128.   mTelephone=rs("Telephone")
  129.   mFax=rs("Fax")
  130.   mMobile=rs("Mobile")
  131.   mEmail=rs("Email")
  132.   mAddTime=rs("AddTime")
  133.   ReplyContent=HtmlStrReplace(rs("ReplyContent"))
  134.   ReplyTime=rs("ReplyTime")
  135.   rs.close
  136.   set rs=nothing
  137. end sub
  138. %>