2007年4月3日
过滤HTML标签
摘要： Function RemoveHTML(strHTML) Dim objRegExp, Match, Matches Set objRegExp = New Regexp objRegExp.IgnoreCase = True objRegExp.Global = True '取闭合的 objRegExp.Pattern = "" '进行匹配 Set Matches = objRe... 阅读全文
posted @ 2007-04-03 15:18 netcorner 阅读(162) 评论(0) 推荐(0)