news.asp

中国缘网新闻系统

javastr="<style>A.menu2{text-decoration: none;color:#000099;line-height: 25pt;font-size:9pt} A.menu2:hover {text-decoration: none;line-height: 25pt;font-size:9pt;color: #ffffff}A.menu2:visited {color:#FF66cFF;line-height: 25pt;font-size:9pt}</style>"
javastr=javastr+"<table width=\"100%\" border=\"0\">"
<!--#include file="articleconn.asp"-->
<%newstype=request("typeid")
n=request("n")
if newstype<> "" then
sql="select  * from article where shenghe=1 and typeid="+cstr(newstype)+" order by dateandtime desc"
set rs=conn.execute(sql)%>
<% 
do while not rs.eof 
%>
javastr=javastr+"<tr><td>"
javastr=javastr+"<font color=\"#000000\" size=\"2\">.</font><span style=\"font-size:9pt;line-height: 15pt\"><%if rs("selectpic") = 1 then%>[图文]<%end if%><a href=\"open.asp?id=<%=rs("newsid")%>&path=<%=rs("path")%>&filename=<%=rs("N_Fname")%>\") target=\"_blank\" ><%=rs("title")%></span></a><font color=\"#999999\" font size=\"1\"><%=rs("")%>(阅读：<%=rs("hits")%>)</font>"
javastr=javastr+"</td></tr>"
<%n=n-1
if n<1 then exit do
rs.movenext 
loop
%> 
<% if n<1 then %>
javastr=javastr+"</table><span style=\"font-size:9pt;line-height: 15pt\"><a href=\"more.asp?ttt=<%=rs("typeid")%>&sss=<%=rs("typename")%>\">  - 更多新闻</span></a>" 
<% end if %>
<%rs.close   
set rs=nothing   
conn.close   
set conn=nothing%>
document.write (javastr) 
<%else%>
document.write ("对不起，暂时没有任何内容。")
<%end if%>