| ASP搜索关键词自动加色高亮 |
| 来源：智睿 浏览：1459 次 发布时间：2020-03-10 11:23:13 |
| 分享一个自己用正则表达式写的关键词自动加色高亮函数。 Function BoldWord(strContent,word) If word="" Then BoldWord = strContent Exit Function End IF dim objRegExp Set objRegExp=new RegExp objRegExp.IgnoreCase =true objRegExp.Global=True objRegExp.Pattern="(" & word & ")" strContent=objRegExp.Replace(strContent,"<font color=""#FF0000""><b>$1</b></font>" ) Set objRegExp=Nothing BoldWord=strContent End Function 函数参数说明 strContent：字符串文字 word：要高亮显示的关键词 |
| 【刷新页面】【加入收藏】【打印此文】 【关闭窗口】 |
| 上一篇：asp 横排显示数据 下一篇：智睿中小学校网站系统 V 10.8.0 学校网站系统 2020小学网站管理系统 |
