专注于互联网--专注于架构

最新标签
网站地图
文章索引
Rss订阅
过滤超级链接 er" _disibledevent=>复制代码 代码如下: Function RegRemoveHref(HTMLstr) Set ra = New RegExp ra.IgnoreCase = True ra.Global = True ra.Pattern = "<A[^>]+>(.+?)<\/A>" RegRemoveHref = ra.replace(HTMLstr,"$1") END Function 过滤所有HTML代码 er" _disibledevent=>复制代码 代码如下: Function Re [阅读全文] [PDF]
1 共1条 分1页