asp 关键词高亮显示(不区分大小写)
来源：asp之家 发布时间：2011-04-07 10:55:00
在这种配置下我们要实现关键词不区分大小写搜索并高亮显示要借助ASP的正则处理了，请看下面代码：
<％
Function Takeout(patrn,string1,colors)
'提取搜索关键字匹配文字
Dim regEx, Match, Matches, tt ' 建立变量。
Set regEx = New RegExp ' 建立正则表达式。
regEx.Pattern = patrn ' 设置模式。
regEx.IgnoreCase = True ' 设置是否区分大小写。
regEx.Global = True ' 设置全局可用性。
Set Matches = regEx.Execute(string1) ' 执行搜索。
For Each Match in Matches ' 遍历 Matches 集合。
RetStr = RetStr & Match.Value & " "
Next
RetStr = trim(RetStr)
if instr(RetStr," ")>0 then
for tt = 0 to ubound(split(RetStr," "))
string1 = replace(string1,split(RetStr," ")(tt),"<font color="""&colors&""">"&split(RetStr," ")(tt)&"</font>")
next
else
string1 = replace(string1,RetStr,"<font color="""&colors&""">"&RetStr&"</font>")
end if
Takeout = string1
End Function
response.write Takeout("jOeKOe", "Joekoe乔客双语版","red")
Function Highlight(strContent,keyword) '标记高亮关键字
Dim RegEx
Set RegEx=new RegExp
RegEx.IgnoreCase =True '不区分大小写
RegEx.Global=True
Dim ArrayKeyword,i
ArrayKeyword = Split(keyword," ")'用空格隔开的多关键字
For i=0 To Ubound(ArrayKeyword)
RegEx.Pattern="("&ArrayKeyword(i)&")"
strContent=RegEx.Replace(strContent,"<font color=red>$1</font>" )
Next
Set RegEx=Nothing
Highlight=strContent
End Function
response.write Highlight("Joekoe乔客双语版","jOeKOe")
％>
0
投稿猜你喜欢
- 前言今天在学习python的过程中，发现python没有switch这个语法。于是就想在python中如何才能实现这个功能呢？正文本文中我们
- # -*- coding: utf8 -*-'''Created on 2013-12-19@author: goo
- Django的View一个视图函数（类），简称视图，是一个简单的Python 函数（类），它接受Web请求并且返回Web响应。响应可以是一张
- 我设了两个SESSION：SESSION（A1），SESSION（A2），然后我现在想结束其中一个SESSION（如：ESEEION（A1）
- Python 3中的File对象不支持next()方法。 Python 3有一个内置函数next()，它通过调用其next ()方法从迭代器
- 我就废话不多说了，大家还是直接看代码吧！# coding=utf-8import loggingimport yamlimport osim
- 官方教程http://www.kuitao8.com/demo/20140224/1/bootstrap-multiselect-maste
- 如下所示：>>> import pandas as pd>>> import numpy as np&g
- 1、如何使用描述符对实例属性做类型检查？实际案例：在某项目中，我们实现了一些类，并希望能像静态类型语言那样(C，C++，Java)对它们的实
数据库的操作是当前系统开发必不可少的开发部分之一，尤其是在现在的大数据时代，数据库尤为重要。但是你真的懂得Java与数据库是怎么连接的么？先- 前言如果你有阅读源码的习惯，可能会看到一些优秀的代码经常出现带有 “with” 关键字的语句，它通常用在什么场景呢？今天就来说说 with
- 对于更完整的代码可以参考，这个是支持数据库的版本。经过测试Asp+Ajax仿google搜索提示效果 数据库版google搜索提示.rar
- 来介绍一下 Python 是采用何种途径解决循环引用问题的。上图中，表示的是对象之间的引用关系，从自对象指向他对象的引用用黑色箭头表示。每个
- 1 跳出循环-breakpython提供了一种方便快捷的跳出循环的方法-break，示例如下，计算未知数字个数的总和：if __name__
- 为了降低用户注册难度，国际站的主注册表单一直在改进。主注册三月至今发生了两次较大的变化，现在对表单调整的地方分解如下：1． 两步
- 我就废话不多说了，直接上代码吧！import cv2from math import fabs, sin, cos, radiansimpo
- 更新什么？概况一览1、优化了 Promise.all 的定义，在 3.7 版本中一些混用 null 或 undefined 的时候的问题已经
- 本文实例讲述了python通过pil为png图片填充上背景颜色的方法。分享给大家供大家参考。具体分析如下：png图片有些是没有背景颜色，如果
- 系统模块import os系统模块用于对系统进行操作。常用方法os模块的常用方法有数十种之多，本文中只选出最常用的几种，其余的还有权限操作、
- 一、安装首先根据自己的python版本下载pyqt4离线包，现在连接：https://www.lfd.uci.edu/~gohlke/pyt
