td.asp

来自「网上商城的设计与实现」· ASP 代码 · 共 33 行

ASP
33 行
字号 
<!--本邮件列表系统由雷の龙独立制作，版权所有。http://gamewu.126.com-->
<!--#include file="conn.asp"-->
<%set rs=server.createobject("adodb.recordset")%>
<meta http-equiv="Content-Language" content="zh-cn">
<link rel="stylesheet" type="text/css" href="STYLE.CSS">
<%If Request.ServerVariables("Request_Method")="GET" then%>
<body background="INDTEXTB.JPG">

<p>　</p>
<p>　</p>
<p>　</p>
<form method="POST" action="td.asp">
  <div align="center">
    <center>
    <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse; border-style: double; border-width: 3" bordercolor="#111111" width="550" height="81">
      <tr>
        <td width="100%" height="81"><%set rs=conn.execute("select yjlb from admin")%>
        <p align="center"><b><font size="3">你真的要<font color="#FF0000">退订</font><%=rs("yjlb")%>邮件列表吗？</font></b></p>
        <p align="center">
        <input type="submit" value="确  定" name="B1" style="border-style: solid; border-width: 1">&nbsp;&nbsp;&nbsp; </td>
      </tr>
    </table>
    </center>
  </div>
</form>
<%else
set rs=conn.execute("delete from email where email='"&session("td")&"'")
set rs=conn.execute("select td from admin")
response.write rs("td")
end if
set rs=nothing
conn.close
set conn=nothing%>

td.asp - 源码说明

本页面展示了「网上商城的设计与实现」中的 td.asp 源码文件，采用 ASP 编程语言编写，共 33 行代码。您可以在线阅读完整代码内容，也可以返回资源详情页下载完整源码包进行本地学习和开发。

虫虫下载站收录了大量与网上商城相关的技术资源，包括源代码、技术文档、电路图等，是电子工程师和嵌入式开发者的专业学习平台。

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?