Hola tengo un Boton que al pulsar sobre el debe mostrarme en un datagrid lo buscado paginandolo pero no lo consigo paginar, si alguien me puede echar una mano el codio es el siguiente,gracias:
Private Sub btnBuscar_Click(ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles btnBuscar.Click
Dim DBConn As SqlConnection
Dim DBCommand As SqlDataAdapter
Dim sql As String
Dim DSPageData As New DataSet
DBConn = New SqlConnection("Data Source=Home;Network Library=DBMSSOCN;Initial Catalog=asdfd;User ID=sa;Password=sa;")
sql = "Select IdCliente,NombreCliente,Apellido1Cliente,Apellido2 Cliente,TelefonoPaisCliente,TelefonoCliente,NifCli ente,Autokatti365,ListaNegraCliente from Clientes Where EmpresaCliente= 1"
If txtNif.Text <> "" Then
sql = sql & " And NifCliente Like '" & txtNif.Text & "%'"
End If
If txtIdCliente.Text <> "" Then
sql = sql & " And IdCliente" & ddlIdCliente.SelectedValue & txtIdCliente.Text
End If
If txtApellido1.Text <> "" Then
sql = sql & " And Apellido1Cliente LIKE '" & txtApellido1.Text & "%'"
End If
If txtApellido2.Text <> "" Then
sql = sql & " And Apellido2Cliente LIKE '" & txtApellido2.Text & "%'"
End If
If txtNombre.Text <> "" Then
sql = sql & " And NombreCliente LIKE '" & txtNombre.Text & "%'"
End If
If chkAut.Checked = True Then
sql = sql & " And Auto=1"
End If
If txtIntroAgencia.Text <> "" Then
sql = sql & " And AgenciaCliente=" & txtIntroAgencia.Text
End If
DBCommand = New SqlDataAdapter(sql, DBConn)
DBCommand.Fill(DSPageData, "Clientes")
DGClientes.DataSource = DSPageData.Tables("Clientes").DefaultView
DGClientes.DataBind()
End Sub
Sub DGClientes_IndexChanged(ByVal obj As Object, ByVal e As DataGridPageChangedEventArgs)
DGClientes.CurrentPageIndex = e.NewPageIndex
DGClientes.DataBind()
End Sub
EL HTML ES EL QUE SIGUE
<asp:datagrid id="DGClientes" style="Z-INDEX: 117; LEFT: 56px; POSITION: absolute; TOP: 304px" runat="server" BorderStyle="Outset" BackColor="Ivory" Width="736px" BorderColor="#E0E0E0" PageSize="13" AllowPaging="True" AutoGenerateColumns="false" BorderWidth="2px" OnPageIndexChanged="DGClientes_IndexChanged" PagerStyle-PageButtonCount="13">