paginas y paginar datagrid
Publicado por oscar (16 intervenciones) el 12/05/2005 20:39:35
Hola miren tengo un datagrid que quiero pàginar pero para empezar solo me muestra una pagina, es decir la consulta trae mas de 50 reg. pero por algun motivo solo me muestra que tengo una pagina.
este es mi codigo
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Introducir aquí el código de usuario para inicializar la página
Dim strConexion As String
strConexion = "data source=servidorcod3;user=sa;pwd=codesis;initial catalog=pachacamac "
'da.Fill(ds, "Clientes")
dgClientes.AllowPaging = True
dgClientes.PagerStyle.Mode = PagerMode.NumericPages
dgClientes.PageSize = 5
dgClientes.PagerStyle.PageButtonCount = 5
If IsPostBack Then
ds = CType(Session("dataset"), DataSet)
Else
da = New SqlClient.SqlDataAdapter("Select * from clientes ", strConexion)
ds = New DataSet("Clientes")
da.Fill(ds, "Clientes")
dgClientes.DataSource = ds.Tables("Clientes")
Session("dataset") = ds
DataBind()
End If
End Sub
este es mi codigo
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Introducir aquí el código de usuario para inicializar la página
Dim strConexion As String
strConexion = "data source=servidorcod3;user=sa;pwd=codesis;initial catalog=pachacamac "
'da.Fill(ds, "Clientes")
dgClientes.AllowPaging = True
dgClientes.PagerStyle.Mode = PagerMode.NumericPages
dgClientes.PageSize = 5
dgClientes.PagerStyle.PageButtonCount = 5
If IsPostBack Then
ds = CType(Session("dataset"), DataSet)
Else
da = New SqlClient.SqlDataAdapter("Select * from clientes ", strConexion)
ds = New DataSet("Clientes")
da.Fill(ds, "Clientes")
dgClientes.DataSource = ds.Tables("Clientes")
Session("dataset") = ds
DataBind()
End If
End Sub
Valora esta pregunta


0