'需要显示的字段的相应的宽度
strShowTemp = strShowTemp & "30%,30%,30%#"
'需要显示的字段的相应的链接文件名
strShowTemp = strShowTemp & "list.asp,,,"
strShowTemp = strShowTemp & "] "
'#########数据模版结束
'#########设置文件尾
strShowTemp = strShowTemp & "[file=foot.js]"
Set clsPage = New SWPage
clsPage.Conn = "Driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.Mappath("../db/datatest.mdb")
clsPage.SQL = "SELECT * FROM datatest"
clsPage.PageSize = 10
clsPage.URL = "pages.asp"
clsPage.FieldList = "id,field1,field2"
clsPage.Template = strShowTemp '显示模版
clsPage.Init()
clsPage.Show
clsPage.Close
Set clsPage = Nothing
intUseTime = FormatNumber((timer()-strStartTime)*1000,3)
Response.Write("<br><br><center>共用时 <font color=""#FF0000"">" & intUseTime & "</font> 毫秒</center>")
%>
四、注意事项
你可以随意修改、使用此代码，但是当你修改后，希望能给我一份拷贝(cjj8110@xxx163.com为了防止垃圾邮件，发邮件时请把163前面的"xxx"删除)。如在使用中发现有Bug请通知我或帮我改正，需要注意的是本类需要用到FSO，主要是URL属性中用到它。现在不使有RecordSet对象的RecordCount属性来获取总记录数了，而是将总记录数存在另外的一个表中，所以在通用方面降低了很多，有兴趣的朋友也可以用Application对象来记录总记录数。不管哪种方法，都使添加记录、删除记录的操作麻烦起来了，但分页中最耗时的地方就是用RecordCount来取总记录数了，当然如果你的库记录数不多的话，是无所谓的。但如果有几十或几百万条记录时，可以很明显的感觉到用不用RecordCount的区别了。
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
