orderno_ok.asp

实现一个用JSP、Servlet技术实现的小型物流网站系统。实现功能如下：管理员通过登录该系统

<!--#include file="../head.asp"-->
   <!--#include file="../checkrole.asp"-->
 <%
      call checkuser("ds") 
  Response.Buffer = true
  Response.ExpiresAbsolute=now()-1
  Response.Expires=0
  Response.CacheControl="no-cache"
 
if Not ChkPost then 
		response.write "<script language='javascript'>"
		response.write"parent.location.href='"&HOPE_InstallDir&"login/login1.asp';</SCRIPT>"
		response.end
end if

 
%>
<TABLE width=778 border=0 align="center" cellPadding=0 cellSpacing=0>
  <TBODY>
  <TR>
    <TD 
    style="BACKGROUND-POSITION: right 50%; BACKGROUND-IMAGE: url(i../mages/bg1.gif); BACKGROUND-REPEAT: repeat-y; BACKGROUND-COLOR: #ffffff" 
    vAlign=top align=middle>
      <BR>
      <TABLE cellSpacing=0 cellPadding=0 width=100% border=0>
        <TBODY>
        <TR>
              <TD width="10%"><IMG height=32 src="../images/myemail.gif" 
            border=0></TD>
              <TD width="90%" background="../images/info_bg.gif">&nbsp;</TD>
        </TR></TBODY></TABLE>
<%
sql="select buyorder,saleorder from Yixiang_emailorder where gsid="&session("id")&"" 
Set rs= Server.CreateObject("ADODB.Recordset") 
rs.open sql,conn,1,1
if not rs.eof then
buyorder=rs("buyorder")
saleorder=rs("saleorder")
rs.close
set rs=nothing
end if
  conn.execute("delete   from Yixiang_emailorder where gsid="&session("id")&"")
%>
<TABLE class=content_border cellSpacing=0 cellPadding=0 width=100% 
border=0>
        <TBODY>
        <TR>
          <TD align=middle><BR>
<table width="87%" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#CBB55A">
          <tr> 
            <td> <table width="100%" border="0" cellpadding="10" cellspacing="0" bgcolor="#FFFFFF">
                <tr> 
                  <td align="center"> 
                      <p>您所订阅的“<font color="#FF0000"><%=buyorder%>&nbsp;<%=saleorder%></font>”供求信息已退订成功！</p>
                      <p>您可以点此 <a href="orderbegin.asp">订阅其他产品的供求信息</a>！</p>
                    <p> 
                    </p></td>
                </tr>
              </table></td>
          </tr>
        </table>
<BR><BR><BR></TD></TR></TBODY></TABLE>




<BR>
<BR>
</TABLE>
<%

conn.close
set conn=nothing
%>