首页 > 编程 > ASP > 正文

ASP标记的字符串指定变色不区分大小写_ASP教程

2024-05-04 11:04:42
字体:
来源:转载
供稿:网友

推荐:ASP中Replace如何替换不区分大小写
我们先来看一看 Replace 的详细参数 描述 返回字符串,其中指定数目的某子字符串被替换为另一个子字符串。 语法 Replace(expression, find, replacewith[, compare[, count[, start]]]) Replace 函数的语法有以下参数: 参数 描述 expression 必选项。 字符串表达式 包

 普通的替换函数

 

代码如下:
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))

 

正则表达式

 

代码如下:
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") 

分享:利用ASP规划聊天室
经 常 在Internet 上 冲 浪 的 网 友 恐 怕 很 少 有 人 没 有 去 过 聊 天 室 胡乱神聊。 你 只 要 稍 微 留 意 一 下 就会 发 现 这 些 聊 天 室 大 多 是 用CGI 程 序 或 者 用java 开 发 的 Applet 维 护 的。 开 发 过 这 类CGI 或Applet 的 程 序 员 都 知 道,

发表评论 共有条评论
用户名: 密码:
验证码: 匿名发表