ScriptHtml 函数之过滤html标记的asp代码_ASP教程-查字典教程网
ScriptHtml 函数之过滤html标记的asp代码
ScriptHtml 函数之过滤html标记的asp代码
发布时间:2016-12-29 来源:查字典编辑
摘要:'=================================================='函数名:ScriptHtml'作用:...

'==================================================

'函数名:ScriptHtml

'作用:过滤html标记

'参数:ConStr------要过滤的字符串

'==================================================

FunctionScriptHtml(ByvalConStr,TagName,FType)

DimRe

SetRe=newRegExp

Re.IgnoreCase=true

Re.Global=True

SelectCaseFType

Case1

Re.Pattern="<"&TagName&"([^>])*>"

ConStr=Re.Replace(ConStr,"")

Case2

Re.Pattern="<"&TagName&"([^>])*>.*?</"&TagName&"([^>])*>"

ConStr=Re.Replace(ConStr,"")

Case3

Re.Pattern="<"&TagName&"([^>])*>"

ConStr=Re.Replace(ConStr,"")

Re.Pattern="</"&TagName&"([^>])*>"

ConStr=Re.Replace(ConStr,"")

EndSelect

ScriptHtml=ConStr

SetRe=Nothing

EndFunction

相关阅读
推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
  • 大家都在看
  • 小编推荐
  • 猜你喜欢
  • 最新ASP教程学习
    热门ASP教程学习
    编程开发子分类