当前位置: 首页 > 图文教程 > 网络编程 > 正则表达式 > vbs:把一段文字中指定字符颜色变成红色的正则

正则表达式
正则表达式 特殊字符应用分析[简单详细入门必看]
asp.net 正则表达式[经常用的到]
javascript 小时:分钟的正则表达式
又一篇正则表达式学习笔记
正则获取图片地址 链接地址
JavaScript 去前后全脚半脚空格的正则
PHP 正则表达式分析RSS
关于内容的分离,正则抽出图片(一定要加精哦)
Javascript lastIndex 正则表达式的一个疑惑
asp去掉html,保留img br p div的正则实现代码
JavaScript 正则表达式解析
正则表达式轻松消除HTML代码
常用正则表达式 整理篇
c# 正则表达式对网页进行有效内容抽取
常用正则表达式 比较实用
javascript 正则修正符
C# 正则表达式经典分类整理集合手册
js mac地址 正则表达式
正则表达式 口诀 学习正则的朋友看看
javascript RegExp对象(正则表达式)

正则表达式 中的 vbs:把一段文字中指定字符颜色变成红色的正则


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 89 ::
收藏到网摘: n/a

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替换为红色的。