Help With Paging

[RPBLEA]

I have a datagrid, Now How Do I get the paging to work I'm reading it in from a database, I've set the default property on the paging, But no numbers or buttons will show up to change pages, ANy Help Here's what I have to show you what kind of code i've implemented

PrivateSub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) HandlesMyBase.Load

Dim conn AsNew SqlConnection(ConfigurationSettings.AppSettings("strDBConn"))

Try

conn.Open()

Dim cmd AsNew SqlCommand("tenrows", conn)

ddpairs.DataSource = cmd.ExecuteReader()

ddpairs.DataBind()

Catch ex As Exception

lblerr.Text = ex.Message

EndTry

conn.Close()

EndSub



PrivateSub btnnext_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

EndSub

PrivateSub NavigationButtonClicked(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnprevious.Click



EndSub





PrivateSub ddpairs_PageIndexChanged(ByVal source AsObject, ByVal e As System.Web.UI.WebControls.DataGridPageChangedEvent Args) Handles ddpairs.PageIndexChanged

ddpairs.CurrentPageIndex = e.NewPageIndex

ddpairs.DataBind()



EndSub



PrivateSub btnback_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

EndSub

PrivateSub ddpairs_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ddpairs.SelectedIndexChanged

EndSub

PrivateSub tblpairs_DataBinding(ByVal sender As System.Object, ByVal e As System.EventArgs)

EndSub

PrivateSub tblpairs_PreRender(ByVal sender As System.Object, ByVal e As System.EventArgs)

EndSub

EndClass

 

[RPBLEA]

Figured this one out, I kept on allowing for custom paging and just needed to set allowpaging to true, Allow paging needed to be true,