SoloCodigo

Programación General => Visual Basic 6.0 e inferiores => VBA => Mensaje iniciado por: pertxina en Martes 7 de Noviembre de 2006, 11:39

Título: Mostrar Ciertas Filas De Un Datagrid
Publicado por: pertxina en Martes 7 de Noviembre de 2006, 11:39
Hola gente. Me gustaría saber si se pueden mostrar ciertas filas de un datagrid, es decir por ejemplo las 10 primeras del recordset.
Mi problema es que hago un filtrado con fechas, pero las fechas están en string y las comparo como sigue...

If (Fecha_Dsd < Fecha_Hasta) Then
        ado_principal.Recordset.MoveFirst
        While Not ado_principal.Recordset.EOF
            If (IsNull(ado_principal.Recordset!Fecha) = True Or Trim(ado_principal.Recordset!Fecha) = "") Then
                Fecha_Psca = Right(Date, 4) & Mid(Date, 4, 2) & Left(Date, 2)
            Else
                Fecha_Psca = Right(CDate(ado_principal.Recordset!Fecha), 4) & Mid(CDate(ado_principal.Recordset!Fecha), 4, 2) & Left(CDate(ado_principal.Recordset!Fecha), 2)
            End If
            If (Fecha_Dsd <= Fecha_Psca And Fecha_Psca <= Fecha_Hasta) Then
****AQUÍ ES DONDE QUIERO QUE SE MUESTREN CIERTAS FILAS EL DATAGRID ***
**** O TOMAR CUENTA DEL NUMERO DE ELLAS QUE QUIERO QUE APAREZCAN EN EL DATAGRID****
            End If
            ado_principal.Recordset.MoveNext
        Wend

Otra posibilidad que se me ocurre es pasar la fecha string que hay en la base de datos que ya estaba hecha a date, pero no sé como es posible eso en access ¿cual sería la consulta que debería hacer?

Gracias a todos