messagepro.asp

来自「国内第一数字点卡销售程序。功能强大。 完整无错！数据文件经MD5加密！经严格测」· ASP 代码 · 共 39 行

<!--#include file="conn.asp"-->
<%   function checkinput(incc)
                 checkinput = false
                 if instr(incc,"<")>0 or instr(incc,">")>0  then
                    checkinput = true
                    exit function
                 end if
     end function 
if checkinput(request("name")) or checkinput(request("tel"))  or checkinput(request("address"))  or checkinput(request("email")) or checkinput(request("spbh")) or checkinput(request("content")) then
   response.write "<script language=javascript>alert('您的输入字符中含有<、>类似字符，此类字符不适合输入，请检查更正，谢谢配合！');history.go(-1);</script>"
   response.End
end if
     
set rs=server.createobject("adodb.recordset")
sqltext="select * from message"
rs.open sqltext,conn,3,3
rs.addnew
rs("name")=request("name")
rs("tel")=request("tel")
rs("address")=request("address")
rs("email")=request("email")
rs("spbh")=request("spbh")
rs("content")=request("content")
rs("time")=now()
rs.update
%>
<script language=vbs>
<!--
        MsgBox "您的留言信息我们已经收到！谢谢您对我们的支持！"
        window.location.href="message.asp"
-->
</script>
<%
  conn.close
  set rs=nothing
  set conn=nothing
  response.end
%>