vbs:把一段文字中指定字符顏色變成紅色的正則
更新時間：2007年04月06日 00:00:00 作者：
vbs:把一段文字中指定字符顏色變成紅色的正則
function c(Tstr,Word)
Dim re
Set re = new RegExp
re.IgnoreCase =True
re.Global=True
re.pattern = "("&Word&")"
c=re.replace(Tstr,"<font style='color:red;'>$1</font>")
End function
調(diào)用方法
response.write c("內(nèi)容字串","要顯示為紅色的字")
比如
<%
function c(Tstr,Word)
Dim re
Set re = new RegExp
re.IgnoreCase =True
re.Global=True
re.pattern = "("&Word&")"
c=re.replace(Tstr,"<font style='color:red;'>$1</font>")
End function
Response.write("lamking.com","a")
%>
就把lamking.com中的a替換為紅色的。
function c(Tstr,Word)
Dim re
Set re = new RegExp
re.IgnoreCase =True
re.Global=True
re.pattern = "("&Word&")"
c=re.replace(Tstr,"<font style='color:red;'>$1</font>")
End function
調(diào)用方法
response.write c("內(nèi)容字串","要顯示為紅色的字")
比如
<%
function c(Tstr,Word)
Dim re
Set re = new RegExp
re.IgnoreCase =True
re.Global=True
re.pattern = "("&Word&")"
c=re.replace(Tstr,"<font style='color:red;'>$1</font>")
End function
Response.write("lamking.com","a")
%>
就把lamking.com中的a替換為紅色的。
相關(guān)文章
asp下過濾重復(fù)字符串的代碼，有時候我們需要過濾一些重復(fù)的字符串，下面的代碼即可解決這個問題。2009-10-10
該函數(shù)通過對指定你的字符串進(jìn)行一次匹配檢測，獲取字符串中的第一個與正則表達(dá)式的內(nèi)容，并且將匹配的內(nèi)容和子匹配的結(jié)果存放在返回數(shù)組中2012-10-10
很多時候我們都需要用到一些驗證的方法，有時候需要用正則表達(dá)式校驗數(shù)據(jù)時，需要到處找資料，今天小編把自己整理的校驗幫助類分享到腳本之家平臺，需要的的朋友參考下2017-07-07
JavaScript正則表達(dá)式迷你書之貪婪模式-學(xué)習(xí)筆記
這篇文章主要介紹了JavaScript正則表達(dá)式迷你書之貪婪模式-學(xué)習(xí)筆記,需要的朋友可以參考下2020-02-02
正則表達(dá)式詳述第一部...2007-04-04
正則表達(dá)式是用于處理字符串的強大工具，它并不是Python的一部分。這篇文章主要介紹了Python正則表達(dá)式之基礎(chǔ)篇的相關(guān)資料,需要的朋友可以參考下2016-01-01
eregi_replace()中特殊字符的處理方法...2007-03-03
淺談js正則字面量//與new RegExp的執(zhí)行效率
以前看到很多文章都說 字面量 會比 new 對象 形式效率高，但是在正則這里，好像不是這么回事，具體的請看下面的分析2020-04-04
比較正宗的驗證郵箱的正則表達(dá)式j(luò)s代碼詳解
郵箱正則最正宗的一條正則語句是^[a-z0-9]+([._\\-]*[a-z0-9])*@([a-z0-9]+[-a-z0-9]*[a-z0-9]+.){1,63}[a-z0-9]+$ 下面我們來講解一下2012-09-09
學(xué)習(xí)了3天的正則了。也算幾掌握了點基本功。所以把原來一直用別人的判斷瀏覽器方法自己來寫了個。2010-05-05