＜script runat="server" language="c#"＞
　　void Page_Load()
　　{
　　string strConnection="Provider=Microsoft.Jet.OleDb.4.0;Data Source=";
　　strConnection+=Server.MapPath("guestbook.mdb");
　　OleDbConnection objConnection=new OleDbConnection(strConnection);
　　OleDbDataAdapter objDataAdapter=new OleDbDataAdapter("select * from 　　guestbook",objConnection);
　　DataSet objDataSet=new DataSet();
　　objDataAdapter.Fill(objDataSet);
　　dgrdMain.DataSource=objDataSet;
　　dgrdMain.DataBind();
　　}
　　void dgrdMain_PageIndexChanged(Object sender, DataGridPageChangedEventArgs e)
　　{
　　dgrdMain.CurrentPageIndex = e.NewPageIndex;
　　DataBind();
　　}
　　＜/script＞
　　＜html＞
　　＜body＞
　　＜asp:DataGrid
　　id="dgrdMain"
　　cellpadding="1"
　　showheader="true"
　　borderwidth="0"
　　allowpaging="true" 启用分页功能
　　pagesize="3" 每一页显示三条记录
　　onpageindexchanged="dgrdMain_pageindexchanged " 调用第×页的函数为　　dgrdMain_PageIndexChanged()
　　runat="server"
　　/＞
　　＜/body＞
　　＜/html＞
　　＜script runat="server" language="vb"＞
　　subPage_Load
　　dim objConnection as OleDbConnection
　　dim objDataAdapter as OleDbDataAdapter
　　dim objDataSet as DataSet
　　objConnection=new OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data 　　Source="+Server.MapPath("guestbook.mdb"))
　　objDataAdapter=new OleDbDataAdapter("select * from guestbook",objConnection)
　　objDataSet=new DataSet
　　objDataAdapter.Fill(objDataSet)
　　dgrdMain.DataSource=objDataSet
　　dgrdMain.DataBind()
　　end sub
　　sub dgrdMain_PageIndexChanged(sender as object,e as datagridpagechangedeventargs)
　　dgrdMain.CurrentPageIndex = e.NewPageIndex
　　DataBind
　　end sub
　　＜/script＞
　　＜html＞
　　＜body＞
　　＜asp:DataGrid
　　id="dgrdMain"
　　cellpadding="1"
　　showheader="true"
　　borderwidth="0"
　　allowpaging="true" 启用分页功能
　　pagesize="3" 每一页显示三条记录
　　onpageindexchanged="dgrdMain_pageindexchanged " 调用第×页的函数为　　dgrdMain_PageIndexChanged()
　　runat="server"
　　/＞
　　＜/body＞
　　＜/html＞