⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 user_tssave.asp

📁 国内第一数字点卡销售程序。功能强大。 完整无错!数据文件经MD5加密!经严格测试
💻 ASP
字号:
<!--#include file="conn.asp"-->
<% if session("user_name")="" then
   response.write "<script language=javascript>alert('请先登陆后操作,谢谢合作!');history.go(-1);</script>"
   response.End
end if%>
<%   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("title")) or checkinput(request("content"))  then
           response.write "<script language=javascript>alert('您的输入字符中含有<、>类似字符,此类字符不适合输入,请检查更正,谢谢配合!');history.go(-1);</script>"
           response.End
     end if 
if request("title")="" then
   response.write "<script language=javascript>alert('请输入订单号或标题,谢谢合作!');history.go(-1);</script>"
   response.End
end if
if 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 ts"
rs.open sqltext,conn,3,3
rs.addnew
rs("user_name")=session("user_name")
rs("title")=replace(trim(request("title")),"'","''")
rs("content")=replace(trim(request("content")),"'","''")
rs.update
%>
<script language=vbs>
<!--
        MsgBox "您的投诉信息我们已经收到!谢谢您的支持,我们将尽快处理,给您满意答复!"
        window.location.href="user_hf.asp"
-->
</script>
<%
  conn.close
  set rs=nothing
  set conn=nothing
  response.end
%>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -