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
调用方法
response.write c("内容字串","要显示为红色的字")
比如
<%
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
调用方法
response.write c("内容字串","要显示为红色的字")
比如
<%
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替换为红色的。
相关文章
asp下过滤重复字符串的代码，有时候我们需要过滤一些重复的字符串，下面的代码即可解决这个问题。2009-10-10
该函数通过对指定你的字符串进行一次匹配检测，获取字符串中的第一个与正则表达式的内容，并且将匹配的内容和子匹配的结果存放在返回数组中2012-10-10
很多时候我们都需要用到一些验证的方法，有时候需要用正则表达式校验数据时，需要到处找资料，今天小编把自己整理的校验帮助类分享到脚本之家平台，需要的的朋友参考下2017-07-07
这篇文章主要介绍了JavaScript正则表达式迷你书之贪婪模式-学习笔记,需要的朋友可以参考下2020-02-02
正则表达式详述第一部...2007-04-04
正则表达式是用于处理字符串的强大工具，它并不是Python的一部分。这篇文章主要介绍了Python正则表达式之基础篇的相关资料,需要的朋友可以参考下2016-01-01
eregi_replace()中特殊字符的处理方法...2007-03-03
以前看到很多文章都说 字面量 会比 new 对象 形式效率高，但是在正则这里，好像不是这么回事，具体的请看下面的分析2020-04-04
邮箱正则最正宗的一条正则语句是^[a-z0-9]+([._\\-]*[a-z0-9])*@([a-z0-9]+[-a-z0-9]*[a-z0-9]+.){1,63}[a-z0-9]+$ 下面我们来讲解一下2012-09-09
学习了3天的正则了。也算几掌握了点基本功。所以把原来一直用别人的判断浏览器方法自己来写了个。2010-05-05
最新评论