快捷導(dǎo)航

asp 標(biāo)記字符串中指定字符變色不區(qū)分大小寫(xiě)

更新時(shí)間：2013年04月07日 12:12:17 作者：

今天遇到這種問(wèn)題，單純的使用replace函數(shù)不行，他會(huì)改變?cè)械淖址拇笮?xiě),在網(wǎng)上找到相關(guān)的代碼，自己備份下

普通的替換函數(shù)

public function HighLight(S,F) 
dim tL,tM,tR,k 
tL="" 
tM="" 
tR=S 
k=instr(1,tR,F,1) 
do while k>0 
tL=tL & left(tR,k-1) 
tM=mid(tR,k,len(F)) 
tL=tL & "<span style='color:red'>" & tM & "</span>" 
tR=right(tR,Len(tR)-len(F)-k+1) 
k=instr(1,tR,F,1) 
loop 
HighLight=tL & tR 
end function 
 tS="abcaBcabCaBCabcaBCa" 
tF="bc" 
response.Write(tS) 
response.Write("<br/>") 
response.Write(HighLight(tS,tF))

正則表達(dá)式

復(fù)制代碼代碼如下:

Function HighLight(S,F) 
Dim regEx 
Set regEx = New RegExp 
regEx.IgnoreCase = True 
regEx.Global = True 
regEx.Pattern = "(" & F & ")" 
HighLight = regEx.Replace(S,"<span style='color:red'>$1</span>") 
End Function 
Response.write HighLight("abcaBcabCaBCabcaBCa","bc") 

您可能感興趣的文章:

字符變色

相關(guān)文章

ASP獲取新增記錄ID值的方法
這篇文章主要介紹了ASP獲取新增記錄ID值的方法,分別介紹了ASP+Access2000、ASP+SQL Server 2000兩種數(shù)據(jù)庫(kù)的獲取方法,需要的朋友可以參考下
2014-06-06
ASP提速技巧推薦
ASP提速技巧推薦...
2007-01-01
asp實(shí)現(xiàn)本周的一周時(shí)間列表的代碼
原理也相對(duì)簡(jiǎn)單，就是利用date函數(shù)獲取日期，然后通過(guò)固定的字符串?dāng)?shù)組進(jìn)行替換。
2009-02-02
asp實(shí)現(xiàn)過(guò)濾關(guān)鍵字的函數(shù)
asp實(shí)現(xiàn)過(guò)濾關(guān)鍵字的函數(shù)...
2007-08-08
ASP vbs 代碼大小寫(xiě)規(guī)范
asp大小寫(xiě)規(guī)范是個(gè)網(wǎng)頁(yè)轉(zhuǎn)換工具，實(shí)現(xiàn)asp中大小寫(xiě)的替換，大家可以測(cè)試下
2008-06-06
asp數(shù)據(jù)庫(kù)連接函數(shù)
asp下常用的連接數(shù)據(jù)庫(kù)函數(shù)，方便調(diào)用
2008-04-04
全面優(yōu)化ASP應(yīng)用程序的性能的方法
全面優(yōu)化ASP應(yīng)用程序的性能的方法...
2007-03-03
使用ASP列出NT用戶組及用戶
使用ASP列出NT用戶組及用戶...
2007-01-01
關(guān)于無(wú)限分級(jí)(ASP+數(shù)據(jù)庫(kù)+JS)的實(shí)現(xiàn)代碼
關(guān)于無(wú)限分級(jí)(ASP+數(shù)據(jù)庫(kù)+JS)的實(shí)現(xiàn)代碼...
2007-05-05
asp 實(shí)現(xiàn)顯示所有的服務(wù)器變量值的函數(shù)
asp 實(shí)現(xiàn)顯示所有的服務(wù)器變量值的函數(shù)...
2007-08-08