⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 nsort.asp

📁 在线发布系统 本系统有两大功能模块:用户模块和后台管理模块。用户模块模块主要实现的主要功能有:文章浏览功能、用户注册登陆能、文章发布功能、用户管理修改文章功能、文章搜索功能。后台管理模块模块主要实现
💻 ASP
字号:

<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
<link href="style.css" rel="stylesheet" type="text/css">
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>

<body>
<!--#include file="top.asp"-->
<table width="710" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
<!--#include file="left.asp"-->
    <td width="1%">&nbsp;</td>
    <td width="69%" valign="top"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><table width="100%"  border="0" cellpadding="0" cellspacing="0" background="img/bg.gif" bgcolor="#F9E49D">
            <tr>
			 <%
				  sql="select * from wen where wen_nsort='"&request.QueryString("nsort")&"' order by wen_id desc"
				  set objrs=conn_str(sql)
				  objrs.pagesize=29
				  %>
              <td height="20" bgcolor="#E1B142">文章类别->>><%=request.QueryString("nsort")%></td>
              <td width="20">&nbsp;</td>
            </tr>
            <tr>
              <td><table width="100%"  border="0" bgcolor="#FFFFFF">
                  <tr>
                    <td><table width="100%"  border="0" cellspacing="1" bgcolor="#E0E0E0">
                        <tr bgcolor="#FFFFFF">
                          <td width="20%"><div align="center" class="style1">文章类别</div></td>
                          <td height="20"><div align="center" class="style1">文章标题</div></td>
                          <td width="20%"><div align="center" class="style1">更新日期</div></td>
                        </tr>
                      </table>
                        <table width="100%"  border="0" cellspacing="1" bgcolor="#E0E0E0">
                         <%
			    if request.querystring("currentpage")="" then 
				currentpage=1
				else
				currentpage=cint(request.querystring("currentpage"))
				end if
				objrs.absolutepage=currentpage
                for i=1 to objrs.pagesize
				if objrs.eof then exit for
				if len(objrs("wen_title"))>12 then 
				title=left(objrs("wen_title"),12)&"……"
				else 
				title=objrs("wen_title")
				end if
				  %>
                          <tr bgcolor="#FFFFFF">
                            <td width="20%" height="20" align="center"><a href="#"><%=objrs.fields("wen_nsort")%></a></td>
                            <td width="60%" height="20" align="center"><a href="show_wen.asp?id=<%=objrs("wen_id")%>"><%=title%></a></td>
                            <td width="20%" height="20" align="center"><%=objrs.fields("wen_date")%></td>
                          </tr>
                          <%
				   objrs.movenext
				   next
				   if i<objrs.pagesize then
				   for j=1 to objrs.pagesize-i
				   %>
                          <tr bgcolor="#FFFFFF">
                            <td width="20%" height="20" align="center"></td>
                            <td width="60%" height="20" align="center"></td>
                            <td width="20%" height="20" align="center"></td>
                          </tr>
                          <%
				   next
				   end if
				   %>
                      </table></td>
                  </tr>
              </table></td>
              <td>&nbsp;</td>
            </tr>
            <tr>
              <td height="20" bgcolor="#F9E49D"><table width="100%"  border="0" cellspacing="1">
                <tr>
                  <td width="10%"><div align="center"><%if currentpage=1 or currentpage<1 then%>
				  首页</div></td>
				  <td width="10%"><div align="center">上一页</div></td>
				  <%else%>
				  <a href="nsort.asp?nsort=<%=request.QueryString("nsort")%>&currentpage=1">首页</a></div></td>
                  <td width="10%"><div align="center"><a href="nsort.asp?nsort=<%=request.QueryString("nsort")%>&currentpage=<%=currentpage-1%>">上一页</a></div></td>
				  <%end if%>
				  <%if currentpage>=objrs.pagecount then%>
				   <td width="10%"><div align="center">下一页</div></td>
                  <td width="10%"><div align="center">末页</div></td>
				  <%else%>
                  <td width="10%"><div align="center"><a href="nsort.asp?nsort=<%=request.QueryString("nsort")%>&currentpage=<%=currentpage+1%>">下一页</a></div></td>
                  <td width="10%"><div align="center"><a href="nsort.asp?nsort=<%=request.QueryString("nsort")%>&currentpage=<%=objrs.pagecount%>">末页</a></div></td>
				  <%end if%>
				  <td width="10%">共<%=objrs.pagecount%>页</td>
				  <td width="10%">第<%=currentpage%>页</td>
                  <td width="40%"><div align="right"><%=request.QueryString("nsort")%>共有文章:<%=objrs.recordcount%>篇</div></td>
                </tr>
              </table>
              </td>
              <%close_str(objrs)%>
              <td>&nbsp;</td>
            </tr>
        </table></td>
      </tr>
      <tr>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td>&nbsp;</td>
      </tr>
      <tr>
        <td></td>
      </tr>
    </table></td>
  </tr>
</table>
<br>
<hr align="center" width="710">
<!--#include file="foot.asp"-->
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -