加入收藏 | 网站地图 | | RSS | WAP
你好,游客 登录 注册 搜索
背景:
阅读内容  领跑条码、标签打印软件 | 来电弹出客户资料

ASP过滤script脚本的正则函数

[日期:2009-09-30] 作者: 来源:网络收集 [字体: ]

function DelJs(str)
  Dim  objRegExp
  Set  objRegExp=New  RegExp  
  '设置是否区分字符大小写,true表示忽略大小写  
  objRegExp.IgnoreCase=True  
  '设置是否全局匹配,True表示全局匹配  
  objRegExp.Global=True  
  objRegExp.Pattern="\<script.+?\<\/script\>"  
  DelJs=objRegExp.Replace(str,"")
  set  objRegExp=nothing
end function

关键词:

收藏 推荐 打印 | 录入:blue1000 | 阅读:
本文评论   查看全部评论 (2)
表情: 姓名: 字数
点评:
       
评论声明
  • 尊重网上道德,遵守中华人民共和国的各项有关法律法规
  • 承担一切因您的行为而直接或间接导致的民事/刑事法律责任
  • 本站管理人员有权保留或删除其管辖留言中的任意内容
  • 本站有权在网站内转载或引用您的评论
  • 参与本评论即表明您已经阅读并接受上述条款
第 2 楼
* 匿名 发表于 2016/12/25 14:52:02
http://www.blue1000.com/bkhtml/c16/2005-01/235.htm 2017年三八节活动简报 http://www.135995.com/show/17052.html 2017年庆祝三八妇女节活动简报 http://www.135995.com/show/17051.html
第 1 楼
* 匿名 发表于 2016/12/24 14:43:55
http://www.blue1000.com/bkhtml/c16/2005-01/235.htm 2017年高二班主任工作计划 http://www.135995.com/show/13119.html 2017年高三班主任工作计划 http://www.135995.com/show/13118.html