ASP网页设计在ASP中，用JScript剧本完成分页的另类...

因为ASP脚本语言非常简单，因此其代码也简单易懂，结合HTML代码，可快速地完成网站的应用程序。还无法完全实现一些企业级的功能：完全的集群、负载均横。<%@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>");
}
%>
转自：静态网制造指南www.ckuyun.comASP由于使用了COM组件所以它会变的十分强大，但是这样的强大由于WindowsNT系统最初的设计问题而会引发大量的安全问题。只要在这样的组件或是操作中一不注意，哪么外部攻击就可以取得相当高的权限而导致网站瘫痪或者数据丢失；