mail_add.asp

多风格网站管理系统 进行网站的综合管理 后台数据库系统

<!--#include file="../Inc/Conn.asp"-->

<%
'=========================================================
'
'产品名称： 公司(企业)网站管理系统（简称：www.web300.cn）
'版权所有：www.web300.cn
'程序制作：[e-mail]
'Copyright 2006-2008 www.web300.cn - All Rights Reserved.
'
'========================================================
%>
<%
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>"
%>