<%@LANGUAGE="JAVASCRIPT"CODEPAGE="936"%>
<!--#includefile="connect.asp"-->
<!--#includefile="news.asp"-->
<%
varDataSet,sql,DataList;
vari=0;
varj=0;
DataList=newNews();
DataSet=Server.CreateObject("Adodb.recordset");
sql="select*fromNewswherengroup='集团新闻'orderbyiddesc";
DataSet.Open(sql,DataConn,1,1);
//是否有数据
if((DataSet.eof)&&(DataSet.bof))
{
Response.Write("<BR>");
Response.Write("===暂无===");
Response.Write("<BR><BR>");
Response.End();
}
//记录总数
NumRecords=DataSet.RecordCount;
//设定每页最大记录数
PageSize=3;
//总页数
NumPages=Math.ceil(NumRecords/PageSize);
//当前页
i=Request.QueryString("CurrentPageID").Count;
if(i==0)
{
CurrentPageID=1;
}
else
{
CurrentPageID=parseInt(Request.QueryString("CurrentPageID"));
}
//初始化
PreviousPageID=CurrentPageID-1;
NextPageID=CurrentPageID+1;
HomePage=1;
EndPage=NumPages;
//内容列表
DataSet.MoveFirst;
DataSet.Move((CurrentPageID-1)*PageSize,1);
while(!DataSet.eof&&j<PageSize)
{
Response.Write("<ahref=show.asp?id="+DataSet("id")+"target=\"_blank\">"+DataSet("subject")+"</a><br>");
j=j+1;
DataSet.MoveNext;
}
//设定URL
if(CurrentPageID==HomePage)
{
Response.Write("<pclass='Normal'><ahref=list.asp?CurrentPageID="+HomePage+">首页</a> ");
Response.Write("上一页 ");
Response.Write("<ahref=list.asp?CurrentPageID="+NextPageID+">下一页</a> ");
Response.Write("<ahref=list.asp?CurrentPageID="+EndPage+">尾页</a> </p>");
}
elseif(CurrentPageID==EndPage)
{
Response.Write("<pclass='Normal'><ahref=list.asp?CurrentPageID="+HomePage+">首页</a> ");
Response.Write("<ahref=list.asp?CurrentPageID="+PreviousPageID+">上一页</a> ");
Response.Write("下一页 ");
Response.Write("<ahref=list.asp?CurrentPageID="+EndPage+">尾页</a> </p>");
}
else
{
Response.Write("<pclass='Normal'><ahref=list.asp?CurrentPageID="+HomePage+">首页</a> ");
Response.Write("<ahref=list.asp?CurrentPageID="+PreviousPageID+">上一页</a> ");
Response.Write("<ahref=list.asp?CurrentPageID="+NextPageID+">下一页</a> ");
Response.Write("<ahref=list.asp?CurrentPageID="+EndPage+">尾页</a> </p>");
}
%>
分享到:
相关推荐
asp.net 用存储过程实现分页(附代码)
asp.net利用存储过程分页代码,代码很详细,有建库脚本和页面的调用。
asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net轻松实现中的分页 asp.net...
Asp教程 Asp中实现分页 Asp提速技巧 Asp系列函数 Asp实现数据查询
在ASP中轻松实现记录集分页显示,超酷
asp.net 在access下实现分页
asp分页,asp分页仿百度,asp分页大全 自己整理的,可以看看啊
asp中kindeditor实现文章分页代码,针对新手asp不知道如果调用,编辑器修改已经打包,附赠:前端调用文章详细也分页源码
几十行asp代码写出的简单分页,很容易看懂。很适合新手编写程序时进行套用
使用AspNetPager控件实现ASP.NET分页功能 “控件+源代码”!!
ASP.NET MVC分页 第几页 共几页 首页 末页
asp 分页 分页类 asp分页 asp分页类
asp.net中分页的实现 asp.net中分页的实现 asp.net中分页的实现
在微软的ASP编程体系中,ADO对象的建立,使得从网页访问数据库成为一件易事,特别是ADO的Recordset对象使得控制数据的输出显示更为方便、自由。而在Visual InterDev6.0(以下简称VI6.0)中,由于Script Object Model...
asp分页,asp分页使用说明asp分页,asp分页使用说明我提供的可能不是最好,但是一定可用.
此外,JScript 脚本只能在某个解释器或“宿主”上运行,如 Active Server Pages(ASP)、Internet 浏览器或者 Windows 脚本宿主。 JScript 是一种宽松类型的语言。宽松类型意味着您不必显式定义变量的数据类型。...
LINQ To SQL实现分页效果源码 VS2008 Frameworks3.5 LINQ To SQL 实现分页效果 数据库SQL 2005
asp超简单分页例子
ASP.NET Repeater分页,查询分页 ASP.NET Repeater分页,查询分页 ASP.NET Repeater分页,查询分页 ASP.NET Repeater分页,查询分页 ASP.NET Repeater分页,查询分页
ajax实现分页jquery代码,可调整css