如果象google一样，以红色显示搜索的关键字？

[mikeppsk]

我想在自己的网站上面的搜索结果里面象google一样以红色显示搜索的关键字，请指教，谢谢

[lonelydreamsym]

与楼上的方法相同，例子在www.yoxun.com/sym/
试一下就知道了

[「已注销」]

<%
Response.write replace("好好学习,天天向上", "学习","<font color=red>学习</font>")
%>

[nattyfish]

string = replace(str, "<font color=red>" & str & "</font>")

[flying310]

用替换函数，在搜索的结果中把搜索到的替换成红色不就行了。

[qihboy]

'用正则表达式突出显示字符串中查询到的单词的函数
Function BoldWord(strContent,word)
dim objRegExp
Set objRegExp=new RegExp
objRegExp.IgnoreCase =true
objRegExp.Global=True

objRegExp.Pattern="(" & word & ")"
strContent=objRegExp.Replace(strContent,"<font color=""#ff0000"">$1</font>" )

Set objRegExp=Nothing
BoldWord=strContent
End Function

[DARKNESSFALL]

用正则表达式

[bluecobra]

replace(content,str, "<font color=red>" & str & "</font>")

[newskyline]

支持“正则表达式”

[古侠]

replace(content,str, "<font color=red>" & str & "</font>")
这个最直观

[inanition]

string = replace(str, "<font color=red>" & str & "</font>")