成都百度快照优化|成都百度关键词排名优化|成都SEO【思为网络】 --【思为网络】成都专业网站优化公司,公司拥有专业搜索引擎优化团队,提供网站整站优化(网站结构优化、网站内容优化、网站外部优化)、百度排名首页优化、GOOGLE优化排名
成都百度关键词排名优化--成都百度快照首页排名优化
你的位置:网站优化首页 » 网页设计制作 » 正文

怎样在ASP中实现replace不区分大小写替换?<br>  --采用ASP正则表达式实现不区分大小写替换

2010-7-15 0:0:0 | 作者:sw996 | 0个评论 | 人浏览

ASP中经常会用到replace,比如在查找时,要求高度显示被查找的字符,怎么使用replace不区分大小写替换字符?

在网上查询了几个相关函数都不能正常运行,以下提供一个ASP正则表达式来实现replace不区分大小写替换字符,保留原来大小写状态,只是高亮进行显示:

函数如下:

Function SWhighstr(Str,keyword) '注释:str为需要搜索的字符串,keyword:搜索的关键词
Dim RegObj
Set RegObj= New RegExp
With RegObj
 .Global = True
 .IgnoreCase = True
 .Pattern="([.\n]*)("&Keyword&")([.\n]*)" 
 SWhighstr=.Replace(Str,"$1<font color='red'>$2</font>$3")
End With
Set RegObj=Nothing
End Function

在网站程序中调用时使用:SWhighstr(str,keyword)

程序使用效果案例:http://www.sw996.com/newslist.asp 不分大小写搜索,查看效果

如在使用过程中有问题,欢迎共同交流学习!

已有0位网友发表了一针见血的评论,你还等什么?

必填

选填

选填

记住我,下次回复时不用重新输入个人信息

必填,不填不让过哦,嘻嘻。

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

相关推荐