<%
action = request.QueryString("action")
if action = "add" then
sql = "select * from qmail where id = -1"
set rs = server.CreateObject("adodb.recordset")
rs.open sql,conn,1,3
rs.addnew
rs("mail") = trim(request.Form("mail"))
rs.update
rs.close
set rs = nothing
response.Write ""
conn.close
set conn = nothing
:response.end()
end if
conn.close
set conn = nothing
%>
东方培训指南网-专业服务北京地区的最好公开课学习卡服务商选择！