Hoy vengo a solicitar su ayuda para hacer un filtro a un DataGrid que me esta quebrado la cabeza xD.
Uso el siguiente codigo para cargar los datos al DataGrid:
Código
Sub Conexion() Set cn = New ADODB.Connection cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\DataAndStuff\cllbd.mdb;Persist Security Info=False" Set rs = New ADODB.Recordset rs.ActiveConnection = cn rs.CursorLocation = adUseClient rs.CursorType = adOpenDynamic rs.LockType = adLockOptimistic rs.Source = "Select * From BDOfertas" rs.Open End Sub
Hasta ahí todo bien.
Ahora, lo que quiero hacer es (con dos TextBox y un CommandButton) un filtro por rango de fechas. PERO (¬¬) no me funciona y no me arroja ningún error ni nada D:.
Para hacer el filtro tengo el siguiente codigo:
Código
Sub ConsultaFechas() SqlDos = "SELECT * FROM BDOFertas WHERE F_Desde > " & txtFechaUno.Text & " And F_Hasta < " & txtFechaDos.Text & "" Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient rs.Open SqlDos, cn, adOpenStatic, , adCmdText End Sub
Se supone que ahí debería filtrar solo ese rango de fechas, pero no me funciona, no se porque, y como dije antes, tampoco me da ningún error. Solo no filtra.
Si alguno de uds me pudiese ayudar con esto. En realidad nunca he sido bueno con las consultas xD.
Saludos y gracias de ante mano!.
PD: Probe con RS.Update al final del Sub, pero me da el error: "El recorset actual no permite actualizaciones asdf"