【asp.NET】(vb.net) 分页类

</Columns>

</asp:datagrid>

<asp:placeholder id="turnpage" runat="server"></asp:placeholder>

2、后代码中绑定数据源

Dim conn As SqlConnection

conn = New SqlConnection(ConfigurationSettings.AppSettings("connectionString"))

conn.Open()

Dim thispage As New SyyPage

thispage.conn = conn

thispage.table = "news"

thispage.fields = "*"

thispage.pkey = "id"

thispage.PageSize = 20 '可以不设置，缺省值是20

thispage.PageList = 10 '可以不设置，缺省值是10

thispage.startpage()

testpage.DataSource = thispage.getdata

testpage.DataBind()

turnpage.Controls.Add(New LiteralControl(thispage.getpager))

conn.Close()