news.asp

党委网站 党委网站党委网站党委网站党委网站党委网站

<!--#include file="conn.asp"-->
<%
set rs=server.CreateObject("adodb.recordset")
sql="select top "&request("max")&" * from net_info where bigclass="&request("big")&" order by id desc"
rs.open sql,conn,1,1
response.Write"document.write(""<table width='100%'  border=0 cellspacing=0 cellpadding=0>"");"
if rs.eof then
rs.close
response.Write"document.write("" <tr>"");"
response.Write"document.write(""<td width='3%' height=22 align=center><img src=images/top.gif width=15 height=20></td>"");"
response.Write"document.write(""<td width=18% align=center>暂时没有内容</td>"");"
response.Write"document.write(""<td width='45%'>&nbsp;</td>"");"
response.Write"document.write(""<td width='34%'>&nbsp;</td>"");"
response.Write"document.write(""</tr>"");"
else
do while not rs.eof 
set rst=server.CreateObject("adodb.recordset")
sqlt="select * from net_sml_class where id="&rs("smlclass")&""
rst.open sqlt,conn,1,1
smlclass=rst("title")
smlid=rst("id")
smlurl=rst("urlfile")
rst.close
response.Write"document.write("" <tr>"");"
response.Write"document.write(""<td width='3%' height=22 align=center><img src=images/top.gif width=15 height=20></td>"");"
response.Write"document.write(""<td width=18% align=center>[<a target=_blank href="&smlurl&"?sml="&smlid&">"&smlclass&"</a>]</td>"");"
response.Write"document.write(""<td width='45%'><a target=_blank href=show.asp?id="&left(rs("id")&" >"&rs("title"),request("left"))&"...</a></td>"");"
response.Write"document.write(""<td width='34%'>"&rs("datetime")&"</td>"");"
response.Write"document.write(""</tr>"");"
rs.movenext
loop
rs.close
end if
response.Write"document.write(""</table>"");"
%>