怎样控制DataList显示的记录行数?

还有DataList能实现分页的功能吗?

解决方案 »

  1.   

    http://community.csdn.net/Expert/topic/3443/3443117.xml?temp=.1002161
      

  2.   

    设置pagesize属性
    如：pagesize=10具体分页的方法，有很多，你可以搜索一下
      

  3.   

    <%@ Page Language="VB" %>
    <%@ import Namespace="System.Data" %>
    <script runat="server">     
    Sub Page_Load(ByVal Sender As Object, ByVal e As EventArgs)        Dim Pgds As PagedDataSource = New PagedDataSource        
    Pgds.DataSource = CreateDataSource().DefaultView        
    Pgds.AllowPaging = True        
    Pgds.PageSize = 6        
    lblTotalPage.Text = Pgds.PageCount.ToString()        Dim CurrentPage As Integer        
    If Not Request.QueryString("Page") Is Nothing Then            
    CurrentPage = Convert.ToInt32(Request.QueryString("Page"))        
    Else            
    CurrentPage = 1        
    End If        Pgds.CurrentPageIndex = CurrentPage - 1        
    lblCurrentPage.Text = CurrentPage.ToString()        If Not Pgds.IsFirstPage Then            
    lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurrentPage - 1)        
    End If        If Not Pgds.IsLastPage Then            
    lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + Convert.ToString(CurrentPage + 1)        
    End If        Repeater1.DataSource = Pgds        
    Repeater1.DataBind()    End SubFunction CreateDataSource() As Datatable Dim dt As DataTable
    Dim dr As DataRow
    Dim i As Integer        dt = New DataTable        
    dt.Columns.Add(New DataColumn("IntegerValue", GetType(Integer)))        
    dt.Columns.Add(New DataColumn("StringValue", GetType(String)))        
    dt.Columns.Add(New DataColumn("DateTimeValue", GetType(DateTime)))        
    dt.Columns.Add(New DataColumn("BoolValue", GetType(Boolean))) For i = 0 To 50
    dr = dt.NewRow()
    dr(0) = i
    dr(1) = "Item " + i.ToString()
    dr(2) = DateTime.Now.ToShortTimeString
    If (i Mod 2 <> 0) Then
    dr(3) = True
    Else
    dr(3) = False
    End If

    dt.Rows.Add(dr)
    Next

    Return dtEnd Function</script>
    <html>
    <head>
    <title>DataRepeater</title>
    <style type=text/css>BODY {FONT: 10px Verdana, Arial, Helvetica, "sans serif"; COLOR: #000000; }
    .txt {FONT-SIZE: 12px}
    </style>
    </head>
    <body>
    <form id="Form1" name=form1 method=post runat="server">
      <table class=txt width="100%" border=0>
        <tbody>
        <tr>
          <td> <asp:hyperlink id=lnkPrev runat="server">上页</asp:hyperlink> <asp:hyperlink id=lnkNext runat="server">下页</asp:hyperlink>
            第
            <asp:label id=lblCurrentPage runat="server"></asp:label>
            页 共 
            <asp:label id=lblTotalPage runat="server"></asp:label>
            页 </td>
        </tr></tbody>
      </table>
      <asp:repeater ID=Repeater1 runat="server"> 
        <itemtemplate>
          <hr align="left" width="60%" size="1">
          <table class=txt width="100%" border="0">
            <tr>
              <td>Order Date: 
                <%# DataBinder.Eval(Container.DataItem, "DateTimeValue", "{0:d}") %></td>
            <tr>
              <td>Quantity: 
                <%# DataBinder.Eval(Container.DataItem, "IntegerValue", "{0:N2}") %></td>
            <tr>
              <td>Item: 
                <%# DataBinder.Eval(Container.DataItem, "StringValue") %></td>
            <tr>
              <td>Order Date: 
                <asp:checkbox id="chk1" checked=<%# DataBinder.Eval(Container.DataItem, "BoolValue")%> runat="server"/>
    </td>
            </tr>
          </table>
        </itemtemplate>
      </asp:repeater>
      <hr hight="1">
    </form>
    </body>
    </html>