ASP网页编程之ASP通用分页类

缺乏可以共同遵循的行业标准，ASP还处在发展初期，大家对它的理解不同，如产品和服务标准，收费标准等，不利于行业的健康发展。分页   1、类的属性、办法

　　这是一个ASP通用分页类。你可以用它便利的给纪录集分页，固然在网上有很多的分页类和分页函数。天职页次要有GetConn、GetRS、SQL、URL、CSSFile、FldName、FldNote、FldWidth、FldAlign、ShowPageType、TleFTColor、TleWidth、PageSize、ShowWidth、Init、Pages、ShowData、Close等属性和办法。
　　1.GetConn属性：用来获得一个已创立的Connection对象。
　　2.GetRS属性：用来获得一个已创立的RecordSet对象，假如设置该属性后，不需求设置SQL属性。
　　3.SQL属性：依据传入的SQL语句，主动创立RecordSet对象
　　4.PageSize属性：设置第页的纪录条数
　　5.FldName属性：假如需求显示库中的数据（即挪用ShowData进程），必定要设置此属性。它是用来获得需求显示的准确的字段名。
　　6.FldNote属性：设置响应字段名的中文申明，需求跟FldName中的字段名逐一对应。
　　7.FldWidth属性：设置显示响应字段数据的单位格的宽度，要跟FldName中的字段名逐一对应。
　　8.FldAlign属性：设置显示响应字段数据的单位格的对齐体例，要跟FldName中的字段名逐一对应。
　　9.TleBGColor进程：设置数据题目栏的后台色彩。假如要显示数据，可以设置此选项。
　　10.TleFTColor属性：设置数据题目栏的字体色彩。
　　11.TleWidth属性：设置数据题目栏的宽度，横排时可设置此属性。
　　12.ShowPageType属性：设置分页条的显示类型。有汉字、字符、英文之分。
　　13.ShowType属性：设置数据显示的类型，分横、竖两种。
　　14.ShowWidth属性：设置数据显示时表格的宽度。
　　15.CSSFile属性：设置响应的CSS文件名及绝对途径。
　　16.URL属性：设置分页条中链接的文件地址。
　　17.Init进程：分页类初始化数据。
　　18.ShowData进程：显示数据。
　　19.Pages进程：显示分页条
　　20.Close进程：分页类停止

2、类的源代码(inc_clsPage.asp)
<%OptionExplicit
'/************************************************
'*                       *
'*Name :Asppagnationclass        *
'*Author:Sunway              *
'*Version:V2.0               *
'*Time :2003-12-26            *
'*Email :                 *
'*HomePage:None(MaybeSoon)         *
'*Notice: Youcanuseandmodifyitfreely,*
'*     BUTPLEASEHOLDTHISITEM.    *
'*      Ifyoumodifyitthatihopeyou*
'*     cansendamailforme.      *
'*                       *
'************************************************/
'#########声明变量#########
'SWStyleClass
PrivateSW_strBTNClass,SW_strTXTClass,SW_strBGColor,SW_intTBWidth,SW_intBDKind,SW_strBGImage,SW_strFTColor,SW_strBDColor,SW_strShowWidth
'#########初始化变量##########
SW_strFTColor="#000000" 'Fontcolor
SW_strBGColor="#FFFFFF" 'Backgroundcolor
SW_intBDKind=1     'Defaultborderkindis"thinborder".
SW_intTBWidth="98%"   'Table'swidth.
SW_strBDColor="#000000" 'Table'sbordercolor.
'SWPageClass
PrivateSW_blnErrorFlag,SW_blnIsHaveRS,SW_strFields
'#########初始化变量##########
SW_blnErrorFlag=false  '设置毛病标记为Fasle，就是无毛病形态
SW_blnIsHaveRS=false  '设置纪录集获得标记为Fasle，就是无纪录集形态
SW_strShowWidth="90%"
SW_strFields =""
'界说链接的显示类型
ConstSW_intShowChinese  =0'汉字，如"上一页、下一页"
ConstSW_intShowEnglish  =1'英文，如"Back、Next"
ConstSW_intShowCharacter =2'特别字符
'ConstSW_intShowImage   =3'图片
'界说数据的显示类型
ConstSW_intHorizontalView=0'横排
ConstSW_intVerticalView =1'竖排
'线的显示类型
ConstSW_intShowBigBorder =2'粗线
ConstSW_intShowSmallBorder=1'细线
ConstSW_intShowNoBorder =0'无线
'显示的页数
ConstSW_intShowPages   =10
<P> '*****************************************
'类型： 类
'目标： 掌握分页信息显示的款式
'*****************************************
ClassSWStyle
  '*****************************************
'类型： 属性
  '目标： 设定后台色彩
  '输出： a_strBGColor: 后台色彩。
  '前往： 无
  '*****************************************
  PublicPropertyLetBGColor(a_strBGColor)
    SW_strBGColor=a_strBGColorASP是依赖组件的，能访问数据库的组件好多就有好多种,再有就是你微软的东西可是什么都要收钱的啊！