hola a todos..

recurro a ustedes pues no puedo persivir el error de mi logica, bueno el 
caso es que tengo una pagina de consulta con un radiolistboton donde 
estan las diferentes opciones de busqueda, un textbox y un datagrid.

cuando la pagina carga le paso una consulta por defecto que me traiga 
lago y mi problema es que cuando el usuario hace una consulta y el 
datagrid pagina cuando dan a la siguiente pagina de la paginacion no lo 
hace.... use metodos de overloads en procedimientos para cargar el grid 
tal y como recomienda Microsoft pero no veo el error espero alguno de 
ustedes pueda verlo 

aqui les va el codigo:

=====================================CODIGO===============================
 Private Sub Page_Load(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles MyBase.Load

      If Not IsPostBack Then BuildGrilla()

   End Sub

   Private Sub Grilla_PageIndexChanged(ByVal source As Object, ByVal e As 
System.Web.UI.WebControls.DataGridPageChangedEventArgs) Handles 
Grilla.PageIndexChanged

      Grilla.CurrentPageIndex = e.NewPageIndex
      BuildGrilla(lblFilter.Text.ToString())

   End Sub

   Private Sub Buscar_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Buscar.Click

      Select Case Radiolist.SelectedIndex
         Case 0
            lblFilter.Text = "Fecha like '" + comp.ConvertirFecha
(txtbusca.Text) + "%'"
         Case 1
            lblFilter.Text = "Asunto LIKE '" + txtbusca.Text + "%'"
         Case 2
            lblFilter.Text = "Tecnico LIKE '" + txtbusca.Text + "%'"
         Case 3
            lblFilter.Text = "Usuario LIKE '" + txtbusca.Text + "%'"
         Case 4
            lblFilter.Text = "Producto LIKE '" + txtbusca.Text + "%'"
         Case 5
            lblFilter.Text = "Descripcion LIKE '" + txtbusca.Text + "%'"
      End Select

      BuildGrilla(lblFilter.Text.ToString())

   End Sub

   Sub BuildGrilla()

      Dim SelectCommand As String
      Dim Command As OleDbDataAdapter

      SelectCommand = "SELECT REQ.RequisicionID, REQ.Asunto, 
REQ.Producto, REQ.Descripcion, REQ.Fecha, " & _
                      "REQ.Usuario,REQ.Estado, E_REQ.Tecnico, 
E_REQ.ENVIADO FROM requisicion REQ inner join " & _
                      "estatus_requisicion E_REQ ON REQ.requisicionID = 
E_REQ.requisicionID WHERE " & _
                      "cast(convert(char(10),REQ.Fecha,101) as datetime) 
= '" & Date.Today & _
                      "' AND REQ.Estado = '1' AND E_REQ.Enviado = 'SI'"

      Command = New OleDbDataAdapter(SelectCommand, comp.Connection)
      Command.Fill(DSrequisicion)
      Grilla.DataBind()

   End Sub

   Sub BuildGrilla(ByVal valor As String)

      comp.DAEstatus.Fill(DSrequisicion)
      DVestatus.RowFilter = valor
      Grilla.DataBind()

   End Sub
==================================GRACIAS DE ANTEMANO=====================