中文字幕av专区_日韩电影在线播放_精品国产精品久久一区免费式_av在线免费观看网站

溫馨提示×

溫馨提示×

您好,登錄后才能下訂單哦!

密碼登錄×
登錄注冊×
其他方式登錄
點擊 登錄注冊 即表示同意《億速云用戶服務條款》

正則表達式鏈接替換函數的技巧有哪些

發布時間:2021-09-23 11:05:52 來源:億速云 閱讀:162 作者:小新 欄目:互聯網科技

這篇文章主要介紹了正則表達式鏈接替換函數的技巧有哪些,具有一定借鑒價值,感興趣的朋友可以參考下,希望大家閱讀完這篇文章之后大有收獲,下面讓小編帶著大家一起了解一下。

正則表達式鏈接替換函數的技巧如下所示:

1)

字符串       前面的字符<a href="http://www.aaa.cn/000011.html">任意長度字符</a>后面的字符

替換成        前面的字符<a href="http://www.bbb.cn/folder/show.asp?id=000011">任意長度字符</a>后面的字符

2)

字符串       前面的字符<a href="http://www.aaa.cn/070006,ccc.html">任意長度字符</a>后面的字符

替換成        前面的字符<a href="http://www.bbb.cn/folder/aa.asp?id=000011">任意長度字符</a>后面的字符

3)    不屬于以上情況的,直接刪除鏈接

字符串       前面的字符<a href="http://www.aaa.cn/dddd.html">任意長度字符</a>后面的字符 

替換成        前面的字符任意長度字符后面的字符

函數的樣式如下,幫忙寫正則表達式,謝謝。

Function ScriptHtml(Byval ConStr,FType)
  Dim Re
  Set Re=new RegExp
  Re.IgnoreCase =true
  Re.Global=True
  Select Case FType
  Case 1
    Re.Pattern="正則表達式"
    ConStr=Re.Replace(ConStr,"")
  Case 2
    Re.Pattern="正則表達式"
    ConStr=Re.Replace(ConStr,"")
  Case other
  End Select
  ScriptHtml=ConStr
  Set Re=Nothing
End Function

感謝你能夠認真閱讀完這篇文章,希望小編分享的“正則表達式鏈接替換函數的技巧有哪些”這篇文章對大家有幫助,同時也希望大家多多支持億速云,關注億速云行業資訊頻道,更多相關知識等著你來學習!

向AI問一下細節

免責聲明:本站發布的內容(圖片、視頻和文字)以原創、轉載和分享為主,文章觀點不代表本網站立場,如果涉及侵權請聯系站長郵箱:is@yisu.com進行舉報,并提供相關證據,一經查實,將立刻刪除涉嫌侵權內容。

AI

牙克石市| 夹江县| 宁乡县| 松潘县| 禄丰县| 治多县| 大新县| 将乐县| 绥滨县| 古浪县| 南昌市| 饶平县| 阳高县| 深圳市| 晋州市| 枞阳县| 乃东县| 长白| 新河县| 柳江县| 科尔| 西丰县| 阿鲁科尔沁旗| 怀来县| 台东县| 佳木斯市| 梁山县| 青岛市| 邳州市| 建德市| 黔南| 眉山市| 汤原县| 贡山| 德清县| 手游| 江陵县| 广平县| 桂阳县| 内丘县| 上饶市|