info.asp

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

<!--#include file="conn.asp"-->
<%
response.Write("document.write(""<TABLE cellSpacing=0 cellPadding=0 width=100% border=0>"");")
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
if rs.eof then
rs.close
response.Write("document.write(""<TR><TD width=70% height=22>"");")
response.Write("document.write(""<IMG src=images/bullet.gif align=middle>"");")
response.Write("document.write(""暂时没有内容"");")
response.Write("document.write(""</TD><TD align=middle width='30%'>"");")
response.Write("document.write(""<SPAN class=gray></SPAN>"");")
response.Write("document.write(""</TD></TR>"");")
else
do while not rs.eof
response.Write("document.write(""<TR><TD width=70% height=22>"");")
response.Write("document.write(""<IMG src=images/bullet.gif align=middle>"");")
if rs("up")=1 then
response.Write("document.write(""<A class=highlight href=show.asp?id="&rs("id")&" target=_blank>"&left(rs("title"),request("left"))&"...</A>"");")
else
response.Write("document.write(""<A  href=show.asp?id="&rs("id")&" target=_blank>"&left(rs("title"),request("left"))&"...</A>"");")
end if
response.Write("document.write(""</TD><TD align=middle width='30%'>"");")
response.Write("document.write(""<SPAN class=gray>"&rs("datetime")&"</SPAN>"");")
response.Write("document.write(""</TD></TR>"");")
rs.movenext
loop
rs.close
end if
response.Write("document.write(""</TABLE>"");")
%>