在(ASP+MSSQL)全文本搜索中如何用正则表达式实现类似百度的显示效果？

在ASP+MSSQL中，我用全文本搜索多关键词(如："asp 教程")搜索，可以得到文章中有 "asp" 和 "教程"的正确结果，但是希望在显示的时候也像百度那样，把带有 "asp" 和 "教程" 的周边内容显示出来，并且关键字用红色显示。我尝试用 asp 函数来做，但效果总是不理想。请教用正则表达式该如何实现这种功能？多谢…

<%
Function BoldWord(strContent,word)
dim objRegExp
Set objRegExp=new RegExp
objRegExp.IgnoreCase=True
objRegExp.Global=True
objRegExp.Pattern="(中|人)"
strContent=objRegExp.Replace(strContent,"<font color=""#FF0000"">$1</font>" )
Set objRegExp=Nothing
BoldWord=strContent
End Function
a = "我是中国人！"
b = "是"
response.write BoldWord(a,b)
%>