www.gusucode.com > 枫的记忆个人主页程序源码程序 > downcode.com\fengdejiyizh\artic.asp
<!--#include file="conn.asp"-->
<%
dim aid
aid=trim(request("aid"))
if aid="1" then
a_id="情感心灵"
elseif aid="2" then
a_id="电子商务"
elseif aid="3" then
a_id="技术探讨"
elseif aid="4" then
a_id="搞笑文章"
elseif aid="5" then
a_id="其他"
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<SCRIPT language="JavaScript" src="rightclick.js"></SCRIPT>
<script language="JavaScript" src="inc_script.js"></script>
<style type="text/css">
<!--
A{text-transform: none; text-decoration: none; color: #666666;}
A:hover {color: #ff0000;text-decoration:derline}
body,table {font-size:9pt;font-family: Verdana, 宋体;color: #666666;}
-->
</style>
</head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0" onselectstart='return false' ondrag='return false' oncontextmenu='return false'>
<table width="100%" border="0" cellspacing="1" cellpadding="4">
<tr>
<td background="img/line1.gif" colspan=5></td>
</tr>
<tr align="center" bgcolor="#f9f9f9" style="color:#333333;">
<td width="10%" height="28">NO.</td>
<td width="55%">文 章 标 题</td>
<td width="15%">点 击</td>
<td width="20%">上 传 时 间</td>
</tr>
<tr>
<td background="img/line1.gif" colspan=5></td>
</tr>
<%
set rs=server.CreateObject("adodb.recordset")
sql="select * from news where n_type='"&a_id&"' order by id desc"
rs.open sql,conn,1,3
PageSize=20
%>
<!--#INCLUDE FILE="page_up_down.asp"-->
<%
if rs.eof and rs.bof then
response.write ("<tr><td colspan=4>暂时没有内容</td></td>")
else
i=1
do while not rs.eof
if processedrecord >=pagesize then
exit do
end if
%>
<tr onMouseOver="this.style.background='#f9f9f9';" onMouseOut="this.style.background='#ffffff'">
<td height="25" align="center"><font color=#ff6600><%=i%></font></td>
<td>·<a href="javascript:thing('news_show.asp?id=<%=rs("id")%>','','scrollbars=yes,resizable=no,width=620,height=600')"><%=rs("title")%></a></td>
<td align="center"><%=rs("flag")%></td>
<td align="center"><%=rs("add_time")%></td>
</tr>
<tr>
<td background="img/line1.gif" colspan=5></td>
</tr>
<%
processedrecord=processedrecord+1
i=i+1
rs.movenext
loop
end if
rs.close
set rs=nothing
%>
</table>
<table width="75%" border="0" cellspacing="0" cellpadding="0" align="right">
<tr height="25">
<td align="right" style="font-size:10px;color:#666666;"><img src="img/count.gif" border="0" align="absbottom"> <%=RecordCount%> <img src="img/page.gif" border="0" align="absbottom"> <font color="#ff6600"><%=Page_No%></font>-<%=pagecount%>
<a href="?aid=<%=aid%>&page_no=1" title=首页><img src="img/first.gif" border="0" align="absbottom"></a>
<%if page_no>1 then%><a href="?aid=<%=aid%>&page_no=<%=page_no-1%>" title=上一页><img src="img/prev.gif" border="0" align="absbottom"></a><%else%><span title=上一页><img src="img/prev.gif" border="0" align="absbottom"></span><%end if%>
<%if page_no<pagecount then%><a href="?aid=<%=aid%>&page_no=<%=page_no+1%>" title=下一页><img src="img/next.gif" border="0" align="absbottom"></a><%else%><span title=下一页><img src="img/next.gif" border="0" align="absbottom"></span><%end if%>
<a href="?aid=<%=aid%>&page_no=<%=pagecount%>" title=末页><img src="img/end.gif" border="0" align="absbottom"></a>
</td>
</tr>
</table>
</body>
</html>