Question

asp从数据库调用字段值，某几个字变颜色，怎么设置？

<%
keyword = "主题"
%>
<%=replace(rs("title"),keyword,"<font color='red'>" & keyword & "</font>")%>

如我的数据库字段里面有文字“我们都是好孩子，好好学习，天天向上”，按上面的程序，只能调一组字，假如我现在想把‘好孩子’ 和 ‘向上’
的颜色变为红色，应该怎样设置，本人菜鸟，希望大侠能指点迷津，万分感谢

Answer 1

<%
keyword = rs("title")
keyword = replace(keyword,"好孩子","<font color='red'>好孩子</font>")
keyword = replace(keyword,"向上","<font color='red'>向上</font>")
%>
<%=keyword%>

Answer 2

<%
keyword = "好孩子 向上"
keywords = split(keyword, " ")
titles = rs("title")
for i = 0 to Ubound(keywords)
titles = replace(titles, keywords(i), "<font color='red'>" & keywords(i) & "</font>")
next
%>
<%=titles%>

Answer 3

楼主可以参考以下代码：
<%
Dim strTemp,arrTemp
......
strTemp = rs("title")
keyword = "好孩子|向上"
If InStr(keyword,"|")>0 Then
arrTemp = Split(keyword,"|")
For i = 0 To UBound(arrTemp)
strTemp = replace(strTemp,arrTemp(i),"<font color='red'>" & arrTemp(i) & "</font>")
Next
Else
strTemp = replace(strTemp,keyword,"<font color='red'>" & keyword & "</font>")
End If
......
%>