一聚教程网：一个值得你收藏的教程网站

ps教程| flash教程| 路由器设置| Jsp教程| 加入收藏

PHP教程 Css教程 操作系统 数据库 安卓下载

首页 游戏下载 软件下载 专题 资讯教程 php教程 asp.net教程 css教程 网页制作 网页特效 手机开发 办公数码
+ -
当前位置：一聚教程网 > asp教程 > 高级应用

推荐专题

最新下载

热门教程

asp 防止提交html代码程序与实例教程

时间：2022-07-02 23:01:36 编辑：袖梨 来源：一聚教程网



 
 


   
 


 


   
 





<%
if request("action") = "submit" then
 ubbHtml = nohtml( request.Form("textarea")
 ubbTitle = nohtml( request.Form("textfield")
 if ubbHtml ="" then
  '提示
 else
  '保存数据
 end if
else
 response.Write("未提交内容")
end if
function nohtml(byval str)
 if isnull(str) or trim(str)="" then
  nohtml=""
  exit function
 end if
    dim re
    Set re=new RegExp
    re.IgnoreCase =true
    re.Global=True
    re.Pattern="(<.[^<]*>)"
    str=re.replace(str," ")
    re.Pattern="()"
    str=re.replace(str," ")
    set re=nothing
 str=replace(str,chr(34),"")
 str=replace(str,"'","")
    nohtml=str
end function
%>

相关文章

热门栏目

一聚教程网| 关于我们| 联系我们| 广告合作| 友情链接| 版权声明

copyRight@2007-2022 www.111CN.NET AII Right Reserved

网站内容来自网络整理或网友投稿如有侵权行为请邮件:[email protected] 我们24小时内处理