picnews1.asp

仿搜狐NBA网站源码,仿搜狐NBA网站源码全站生成HTML静态页面

<!--#include file=conn1.asp-->
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: -10px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<LINK href="images/style.css" type=text/css rel=stylesheet>
<%
Set rs=Server.CreateObject("ADODB.RecordSet") 
sql="select * from NEWS where firstimage<>''  order by id desc"
rs.Open sql,conn,1,1
if rs.eof or rs.bof then
response.Write("暂无图片新闻！")
response.End()
else
%>
<center><a href="news/news_<%=rs("id")%>.htm" title="<%=rs("mi222_title")%>" target="_blank"><img src="admin/eWebEditor/UploadFile/<%=rs("firstimage")%>" height="150" width="160" border="0"></a><br>
<a href="news/news_<%=rs("id")%>.htm" title="<%=rs("mi222_title")%>" target="_blank"><%=left(rs("mi222_title"),15)%></a></center>
<%
end if
rs.close
%>