book_save.asp

站完全依据SEO技术建立

<!--#include file="inc/conn.asp"-->
<%
nick=request("nick")
mail=request("mail")
book=request("book")


cityping=split(cityping,"|")
for i=0 to UBound(cityping)
if instr(nick,cityping(i)) or instr(mail,cityping(i)) or instr(book,cityping(i)) then
response.write"<script>alert('意见反馈出错，下面是产生错误的可能原因：\n\n·在您的反馈资料中含有敏感字符');history.go(-1);</script>"
response.end
end if
next
if mail="" or len(mail)<8  or instr(mail,"@")=0 or instr(mail,".")=0 then
response.write"<script>alert('意见反馈出错，下面是产生错误的可能原因：\n\n·请输入正确的联系邮箱');history.go(-1)</script>"
response.end
end if

Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from book"
rs.open sql,conn,1,3
rs.addnew
rs("nick")=nick
rs("mail")=mail
rs("book")=book
rs.update
rs.close
set rs=nothing

response.write"<script>alert('操作成功，谢谢您的参与！');window.open('index.asp','_self')</script>"
response.end
%>