求一正则表达式

Function ReplaceHtmlStr(str)
 Dim re
 Set re=new RegExp
 re.IgnoreCase =True
 re.Global=True
 re.Pattern="[<a href=\".*\">]"
 str=re.Replace(str,"<a href=\"#\">")
 ReplaceHtmlStr=str
end function

解决方案 »

  1.   

    Function ReplaceHtmlStr1(str)
     Dim re
     Set re=new RegExp
     re.IgnoreCase =True
     re.Global=True
     re.Pattern="<a href=(.*)>[^.*</a>]"
     str=re.Replace(str,"<a href=""#"">")
     ReplaceHtmlStr1=str
    end function
    str="<a href='ddd'>link</a>"
    response.Write(ReplaceHtmlStr1(str))
      

  2.   

    建议用自己写一个专门处理的程序，单单一个正则表达式解决不了问题。
    合法的链接格式
    <a href="http://163.com" target="_blank">网易</a>
    <a href=http://163.com target="_blank">网易</a>
    <a href=http://163.com?href=http://163.com target="_blank">网易</a>
    <a href=http://163.com>网易</a>
    <a target="_blank" href=http://163.com>网易</a>
    <a href=http://163.com?href=http://163.com target="_blank">网易</a>
    <a href="http://163.com?a href=http://163.com" target="_blank">网易</a>等等，当然还有一些错误的html写法，这些正则表达式是解决不了的
      

  3.   

    可以给你一个思路，先进行分析，检查该html段中是否有"，如有'，把"替换成"，没有"的，依据=将"补全，这个时候再使用正则表达式href="[\\.*]"来进行替换，替换成href="#"。
      

  4.   

    Function ReplaceHtmlStr(str)
     Dim re
     Set re=new RegExp
     re.IgnoreCase =True
     re.Global=True
     re.Pattern="[<a href=\".*\">]"
     str=re.Replace(str,"<a href=\"#\">")
     ReplaceHtmlStr=str
    end function-----------------
    怎么看起来不大像js.................
      

  5.   

    js版
    -------------------------------------------
    <textarea id="text1" rows="3" cols="56">
    <a href="http://163.com" target="_blank">网易</a>
    </textarea>
    <input type="button" onclick="alert(ReplaceHref(text1.value));" value="替换"><script language="javascript">function ReplaceHref(str){
    var reg = /<a [^>]*>/gi;
    return str.replace(reg,"<a href=\"#\">");
    }
    </script>
      

  6.   

    <SCRIPT LANGUAGE="JavaScript">
    <!--
    str="<a href=\"fadfa.htm\">";
    reg=/^<a href=(.)*>$/;
    alert(str.replace(reg,"<a href=\"#\">"));
    //-->
    </SCRIPT>
      

  7.   

    leohuang(LEO) 的比较好考虑的比我的全面
      

  8.   

    <html>
    <script language="javascript">
    function replaceNil(subject) {
    alert(subject.replace(/(<a.+?href=)(.+?)>/img, "$1\"#\">"));
    }
    </script>
    <body>
    <textarea name="test" cols="100" rows="3"></textarea>
    <input name="clk" value="test" type="button" onclick="javascript:replaceNil(document.getElementById('test').value);">
    </body>
    </html>
      

  9.   

    <a href='http://ngoto.sohu.com/D=SOHU/A=3c72aa11b78a3502d30f6863afeca511/T=K1/>http://adtaobao.allyes.com/main/adfclick?db=adtaobao&bid=694,37475,58&cid=3064,192,1&sid=37477&show=ignore&url=http://www.taobao.com/' target=_blank>购物</a>这段从SOHU页面中拷贝出来的html片断用leohuang(LEO)的正则表达式就会有问题，连接中包含>字符，这也是合法的
      

  10.   

    为什么三楼的会少一个字母呢
    Function ReplaceHtmlStr1(str)
     Dim re
     Set re=new RegExp
     re.IgnoreCase =True
     re.Global=True
     re.Pattern="<a href=(.*)>[^.*</a>]"
     str=re.Replace(str,"<a href=""#"">")
     ReplaceHtmlStr1=str
    end function
    str="<a href='ddd'>link</a>"
    response.Write(ReplaceHtmlStr1(str))
      

  11.   

    "这段从SOHU页面中拷贝出来的html片断用leohuang(LEO)的正则表达式就会有问题，连接中包含>字符，这也是合法的"
    -----在此暂时不考虑这情况，我想用bclz_vs(边城)的那段
      

  12.   

    "(<a href=)("|')(.+)\2>"可以试试
      

  13.   

    补充一下
    "(<a href=)(["|']{0,1})(.+)\2>"
      

  14.   

    to taolixiang   re.Pattern="(<a href=)('|')(.+)\2>"   不对当<a href=ddd  时就不对了
      

  15.   

    补充一下
    "(<a href=)(["|']{0,1})(.+)\2>"
    -----------------------------------
    也不对
      

  16.   

    vbscript:
    Function ReplaceHtmlStr1(str)
     Dim re
     Set re=new RegExp
     re.IgnoreCase =True
     re.Global=True
     re.Pattern="<a href=(.[^>]*)>"
     str=re.Replace(str,"<a href=""#"">")
     ReplaceHtmlStr1=str
    end function
    str="front<a href=""ddd"" target=""_blank"">link</a>last<a href=""abcdef"" target=""_blank"">link1</a>last1Third<font color=red><a href=""efg"">link2</a>last3"
    response.Write(ReplaceHtmlStr1(str))
    测试通过
    结果：front<a href="#">link</a>last<a href="#">link1</a>last1sdffffffffffff<font color=red><a href="#">link2</a>last3