Hola a todos. He estado trabajando en el siguiente codigo que lo que hace es paginar un elemento repeater mediante un PagedDataSource. Lo que me ocurre es que la primera pagina me la muestra genial, con sus 10 elementos, el problema es que le doy a siguiente y no me muestra nada... El codigo es el siguiente:
Código:
Dim conexion As New OleDbConnection
Dim comando As New OleDbCommand
Dim adaptador As New OleDbDataAdapter
Dim dsproductos As New DataSet
Dim pageds As New PagedDataSource
conexion.ConnectionString = "cadena de conexion al excel"
conexion.Open()
comando.CommandText = "SELECT * FROM [tarifa$]"
comando.Connection = conexion
adaptador.SelectCommand = comando
'llenamos el dataset con los datos de la tabla
adaptador.Fill(dsproductos, "productos")
pageds.DataSource = dsproductos.Tables("productos").DefaultView
pageds.AllowPaging = True
pageds.PageSize = 10
Dim curpage As Integer
If Not IsNothing(Request.QueryString("Page")) Then
curpage = Convert.ToInt32(Request.QueryString("Page"))
Else
curpage = 1
End If
pageds.CurrentPageIndex = curpage - 1
lblCurrpage.Text = "Page: " + curpage.ToString()
If Not pageds.IsFirstPage Then
lnkPrev.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + CStr(curpage - 1)
End If
If Not pageds.IsLastPage Then
lnkNext.NavigateUrl = Request.CurrentExecutionFilePath + "?Page=" + CStr(curpage + 1)
End If
repeater1.DataSource = pageds
repeater1l.DataBind()
El elemento repeater se llama: repeater 1
El elemento pagedDataSource se llama: pageds
lnkPrev y lnkNext son los link que marcan las paginas anterior y siguiente
Curpage es el entero que identifica el numero de la pagina.
Espero que alguien me pueda ayudar. Muchas gracias a todos por adelantado.
Un saludo.
Pinty