正则表达式html:正则表达式轻松消除HTML代码来源: 发布时间:星期日, 2009年9月6日 浏览:11次 评论:0
、清楚内容中Javsscript 代码
复制代码 代码如下: Function ClearJSCode(originCode) Dim reg reg = New RegExp reg.Pattern = "<SCRIPT[^<]*</SCRIPT>" reg.IgnoreCase = True reg.Global = True clearJSCode = reg.Replace(originCode, "") End Function 2、清除内容中HTML代码 复制代码 代码如下: Function ClearHTMLCode(originCode) Dim reg reg = RegExp reg.Pattern = "<[^>]*>" reg.IgnoreCase = True reg.Global = True ClearHTMLCode = reg.Replace(originCode, "") End Function 现在好多网站WebSite内容都是使用采集生成使用上边代码就可以轻松将内容中HTML和JS代码清除掉 1
相关文章读者评论发表评论 |
|