常用软件类： |
|杀毒安全 | |联络聊天 | |网络软件 | |多媒体类 | |系统工具 | |图形图像 | |系统工具 | |应用软件 | |行业软件 |
开发设计类： |
|动画制作 | |图像处理 | |3D设计 | |操作系统 | |站长学院 | |网络相关 | |WEB设计 | |数据库类 | |程序开发 |
通过浏览器进行分页浏览数据记录基本类型主要有二种。其他类型的分页浏览要么是对这二种类型的修改，要么是对这二种类型的综合。具体表现方式的如下面这二幅图：
图01：第一种分页浏览数据记录式样
图02：第二种分页浏览数据记录式样
下面就来探讨一下在ASP.NET中这二种分页浏览数据记录的具体实现过程：
首先来介绍一下我们使用的数据库，在本文中为了方便起见，我们使用了本地数据库Access 2000，数据库名称为"Data.mdb"，里面存放了一张数据表"tblItem"。此数据表的结构如下：
| 字段名称 | 字段类型 |
| ItemID | 自动编号 |
| ItemName | 文本类型 |
如果你采用的是别的数据库，只需对下面介绍的程序进行简单的修改就可以了。这将在下面介绍。
一． 本文程序设计和运行的软件环境：
（1）.微软公司视窗2000服务器版
（2）..Net FrameWork SDK Beta 2
二． 第一种分页浏览数据记录的关键步骤以及实现方法：
（1）.首先要得到初始浏览数据记录的超链接字符串：
这其实很关键，因为在第一种分页浏览中的"首页"、"下一页"等操作，都是通过在这个超链接字符串后面加入要浏览页面的参数来实现的，在本文的程序中是通过GetPageName ( )函数来实现的。此函数具体如下：
| Function GetPageName ( ) As String Dim Str As String Dim Pos As Short Str = Request.ServerVariables ( "Script_Name" ).Trim ( ) Pos = Str.LastIndexOf ( "/" ) If Pos >= 0 Then Return Str.SubString ( Pos + 1 ) Else Return Str End If End Function |
（2）.要得到你所要浏览的数据记录总数：
在本文中，为了方便，我们是把数据表"tblItem"中的全部记录都拿来浏览。ASP.NET页面通过ADO.NET来得到数据表"tblItem"。下面代码就是利用ADO.NET来得到"tblItm"表中记录总数的程序代码：
| <% @ Page Language = "VB" %> <% @ Import Namespace = "System.Data" %> <% @ Import Namespace = "System.Data.OleDb" %> <script runat = "server" > Dim strConn As String '定义数据连接字符串 Dim SQL As String '定义SQL语句 Dim odConn As OleDbConnection Dim odAdapt As OleDbDataAdapter Dim DS As DataSet '创建DataSet对象 Dim DT As DataTable '创建DataTable对象 Dim nStart As Integer '存放当前页面的起始记录序号 Dim nEnd As Integer '存放当前页面的终止记录序号 Dim i As Integer '确认要浏览的页面序号 nPage = Convert.ToInt32 ( Request.QueryString ( "Page" ) ) SQL = "SELECT * FROM tblItem " '创建数据连接字符串 strConn = " Provider = Microsoft.Jet.OLEDB.4.0 ; " & _ " Data Source = " & Server.MapPath ( "data.mdb" ) & " ; " & _ " User ID = ; Password = ; " Try '得到数据记录总数 odConn = New OleDbConnection ( strConn ) odAdapt = New OleDbDataAdapter ( SQL , odConn ) DS = New DataSet odAdapt.Fill ( DS ) DT = DS.Tables ( 0 ) '得到数据记录总数 nRecCount = DT.Rows.Count Catch e As Exception Response.Write("错误信息： <b>" & e.Message & "</b><p>") nRecCount = 0 End Try </script > |
