add_email.asp

来自「此系统都是基于ASP+ACCESS技术开发的电子商务平台,属于全自动化、全智能的」· ASP 代码 · 共 29 行

<!--#include file="Inc/conn.asp"-->
<%
'=================================
'
'   '   冠龙网络科技有限公司
'    网址：http://www.glgk.com/
'    电话：[phone]
'    Q Q     53180986
'  copyright(c)2006 GUANLONG
'
'=================================
%>
<%
dim rs
dim sql

set rs=server.createobject("adodb.recordset")
sql="select * from email where email='"&email&"'"
rs.open sql,conn,3,3
rs.addnew
rs("email")=request("email")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
  response.write"<SCRIPT language=JavaScript>alert('感谢你订阅本站的邮件列表');"
  response.write"javascript:history.go(-1)</SCRIPT>"
%>