今日,碰到一个问题:如何在网页中高亮显示不区分大小写的关键字

  例如:文本abcaBcabCaBCabcaBCa,关键字bc,在不区分大小写的情况,一共有6个匹配项。

  则在网页中显示的是abcaBcabCaBCabcaBCa。

  很多人,想到是replace函数。原型为

    Replace(string,find,replacewith[,start[,count[,compare]]])

    string    必选项,字符串表达式,包含要替代的子字符串

    find     必选项,被搜索的子字符串

    replacewith 必选项,用于替换的子字符串

    start    可选项,开始搜索子字符串的位置,默认是1

    count    可选项,执行子字符串替换的数目,默认是-1,表示进行所有可能的替换

    compare  可选项,比较方式,0:二进制比较;1:文本比较

  

  虽然最后一个参数能解决不区分大小写的问题,那么该替换为什么呢?

  因为从示例上看,bc,Bc,bC,BC都被搜索到了,却不能统一替换为一个文本

  那么,利用Instr这个函数来协助我们吧。

  从源字符串,自左向右搜索,每找到一个匹配项。就按三步走

    1、将匹配项左边的字符串输出

    2、将匹配项套上样式<span>后输出

    3、重复上两步,继续搜索右边的字符串,直到搜索结尾

  代码如下:

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")

本文转自万仓一黍博客园博客,原文链接http://www.cnblogs.com/grenet/archive/2010/01/21/1653626.html:,如需转载请自行联系原作者

高亮显示不区分大小写的关键字——ASP相关推荐

  1. ASP 高亮显示不区分大小写的关键字

    今日,碰到一个问题:如何在网页中高亮显示不区分大小写的关键字 例如:文本abcaBcabCaBCabcaBCa,关键字bc,在不区分大小写的情况,一共有6个匹配项. 则在网页中显示的是abcaBcab ...

  2. php mysql 高亮显示_PHP实现多关键字加亮功能

    本文主要介绍的是PHP实现多关键字加亮功能,可以实现在搜索的时候进行高亮提醒,具体实现代码如下: 项目结构: 搜索结果:  高亮显示 项目所需数据库结构: 实现代码: conn.php $conn = ...

  3. 【前端开发实例】HTML 检索内容 关键字 JS 高亮显示 -(二)

    Question. 问题 在开发过程中,我们会遇到需要高亮显示的文本,无论是新闻.产品还是案例的检索,对于检索到的内容,都会产生这样的需求,一种好的处理方式就是通过 JS 实现.先来看看 PC 端的百 ...

  4. python中类型错误、计数不采用关键字的错误怎么改_Learning/Python-面试问题.md at master · yxxyyx1314/Learning · GitHub...

    Python-面试问题 参考链接 面:Python 中什么元素为假? 答:(0,空字符串,空列表.空字典.空元组.None, False) 面:Python 中查看某个关键字的属性? 答:dir ( ...

  5. asp是什么文件?html和asp的区别?(HTML是客户端语言,主要用于创建静态网页;asp是服务器端语言,用于设计用户交互式页面或动态页面)

    1.HTML是一种客户端语言,它允许Web浏览器解析并显示在标签之间写入的内容,允许把图像和对象嵌入到网页中.ASP是一种服务器端语言,这意味着写入的代码将被发送到服务器中,并根据要求执行的操作返回一 ...

  6. 在ASP.NET中使用Global.asax文件

    文章关键字:ASP.Net,应用层,模块 概述 Global.asax 位于应用程序根目录下.虽然 Visual Studio .NET 会自动插入这个文件到所有的 ASP.NET 项目中,但是它实际 ...

  7. 二.编写第一个c#程序(注释,命名空间,类,Main方法,标识符,关键字,输入,输出语句,)...

    复习编写一个控制台应用程序,目标是在控制台输出"Hello World" 1.第一步,打开Visual Studio 2012以上版本(我用的是VS 2015),打开完成后出现以下 ...

  8. ASP与ActiveX控件交互实战(一)

    龙卷风 关键字:ASP,ActiveX控件,数字签名,安全 ActiveX控件运行在客户端.我们可以获得客户端的一些信息,如IC卡的信息,客户端的验证等等.但是ActiveX控件也有许多缺点:客户端的 ...

  9. ASP错误代码中文说明大全:

    ASP错误代码中文说明大全: ASP 错误代码 中文描述 ASP 0100 内存不足 ASP 0101 意外错误 ASP 0102 需要字符串输入 ASP 0103 需要数字输入 ASP 0104 不 ...

  10. ASP.net中将Word/Excel转换成PDF

    关键字 : Asp.net, word, Excel, PDF 参照网友的一篇文章( http://www.vuu.cn/vuu/vuu-a/4302.html) --- ASP.Net实现将Word ...

最新文章

  1. jenkins slave在master显示和运行问题
  2. 冷知识 —— 成语与典故
  3. 掌门教育微服务体系 Solar | 阿里巴巴 Nacos 企业级落地上篇
  4. chkconfig 系统服务管理
  5. 加速repo sync的技巧
  6. java 异常处理机制(java 编程思想)
  7. C#空接合操作符——??
  8. 【面试】不容错过的12个深度学习面试问题
  9. python简明教程电子书下载_python简明教程中文pdf下载-Python入门级电子书完整免费版-东坡下载...
  10. hp laserjet p1108打印机连接win10电脑
  11. 通过socks5代理下载webrtc源码错误:curl: (7) Can't complete SOCKS5 connection xx.xx.xx.xx
  12. [APIO2014]序列分割
  13. 太阳辐射最少的地区_我国太阳辐射总量最少的是哪一个地区?
  14. Python基础_闭包和迭代器
  15. 学习大数据,为大家推荐几本好书
  16. 硬件工程师综合训练 旋转图形设计
  17. Golang并发下的数据结构及其底层剖析
  18. 【每日一问】工作日问题
  19. 这个“安装 OS X Yosemite”应用程序副本不能验证
  20. android版本向上兼容吗,Android 的向前兼容和向后兼容

热门文章

  1. 易达项目的工作进程第二天
  2. 5个提高效率的编程工作环境
  3. 中文编码--中国程序员之”银弹“?
  4. 在Windows Mobile上隐藏你的应用程序
  5. XML+Application来编写计数器(二)
  6. hzwer模拟赛 感冒病毒
  7. Simple Data帮助类
  8. Core Data持久化数据存储(1)
  9. 12.11scrum report (第十次)
  10. c# wince 小技巧