第一次真正接触正则表达式

最新推荐文章于 2024-07-06 00:10:45 发布

catally

最新推荐文章于 2024-07-06 00:10:45 发布

阅读量680

点赞数

分类专栏：技术类文章文章标签：正则表达式 regex function

本文链接：https://blog.csdn.net/catally/article/details/139212

版权

技术类文章专栏收录该内容

36 篇文章 0 订阅

订阅专栏

以前只是听说，今天在论坛第一次看到具体实例。

<%
Function GetTextFromHtml(strHtml)
        Dim strPatrn
            strPatrn="<.*?>"     '正则表达式串
        Dim regEx
        Set regEx = New RegExp    '定义一个正则表达式对象
        regEx.Pattern = strPatrn
        regEx.IgnoreCase = True   '对正则表达式对象的属性赋值。忽略大小写
        regEx.Global = True       '从整个字串中找匹配
        GetTextFromHtml = regEx.Replace(strHtml,"")'将匹配的字串替换为空串
End Function

response.write GetTextFromHtml("<a href=http://aaa.com>中华人民共和国</a>")
%>

主要的功能是取<a></a>之间的字符