asp 关于标题加粗的问题!

来源:百度知道 编辑:UC知道 时间:2024/06/30 09:15:49
<%
set adrs=server.createobject("adodb.recordset")
adsql="select * from xinxi"
adrs.open adsql,conn,1,1
if adrs.eof or adrs.bof then
response.write"无记录"
end if
do while not adrs.eof
response.write"<a href='#' target='_blank'><font color='"&adrs("in_color")&"'> "&adrs("in_title")&" </font></a><br>"
adrs.movenext
loop
adrs.close
set adrs=nothing
%>

数据表 xinxi

字段
in_id in_title in_color in_cu
1 考试考试 #000000 yes
2 试题试题 #cccccc no

想实现的效果
当in_cu 为yes 时候 in_title(信息标题)加粗
那位大哥帮忙解决下 在线等!!!!2008.1.25/16:42
谢谢!

<%
set adrs=server.createobject("adodb.recordset")
adsql="select * from xinxi"
adrs.open adsql,conn,1,1
if adrs.eof or adrs.bof then
response.write"无记录"
end if

do while not adrs.eof
response.write"<a href='#' target='_blank'><font color='"&adrs("in_color")&"'> "

if adrs("in_cu")=true then
response.Write "<b>"
end if

response.Write adrs("in_title")

if adrs("in_cu")=true then
response.Write "</b>"
end if

response.Write " </font></a><br>"
adrs.movenext
loop
adrs.close
set adrs=nothing
%>