<div class="right_box">
<div class="right_box_biao"><a href="index.asp">留言中心</a></div>
<div class="right_box_list">
<div class="dh">
		 <li>
		  <a href="add_book.asp">发表留言</a></li>
		 <li> <a href="index.asp">查看留言</a></li>
</div>
</div>
</div>

<div class="right_box">
<div class="right_box_biao"><a href="../news.asp">推荐信息</a></div>
<div class="right_box_list"><ul>
<% 
set news=server.createobject("adodb.recordset") 
exec="select top 8 * from  [news]  where tuijian=1 order by id desc  " 
news.open exec,conn,1,1 
if news.eof and news.bof then
response.Write("&nbsp;暂无新闻 !")
end if
%>

<%
f=1
do while not news.eof

if IsNull(news("url")) or trim(news("url")&"")="" then
url="../shownews.asp?id="&news("id")&""
else
url=""&news("url")&""
end if
if IsNull(news("color")) or trim(news("color")&"")="" then
color="#000000"
else
color=""&news("color")&""
end if
%> 
	
	<li>·<a href="<%=url%>" title="<%=InterceptString(news("title"),86)%>" style="color:<%=color%>;"><%=InterceptString(news("title"),30)%></a></li>
	<%
if f mod 2 =0 then
response.Write ""
end if 
f=f+1 
news.movenext 
loop 
news.close
set news=nothing
%>
</ul>
</div>
</div>



