Título: Buscar fecha en MSHFlexgrid Publicado por: ka0s en 8 Junio 2010, 16:13 pm Buenas gente, mi consulta es la siguiente:
Estoy realizando un programa en VB, donde lo que hace es conectar a la base de datos (ADO). Tengo un BUSCAR, que lo que quiero que haga es que busque por VENCIMIENTO. O sea que se ingresaría una FECHA en el BUSCAR y después tendría que visualizarlo en la grilla. Yo lo que hice fue lo siguiente: Citar Private Sub cmdbuscar_Click() If txtbuscar.Text = "" Then Call Conectar("Select * from infocuota") MsgBox ("Ingrese la fecha a buscar"), vbCritical Set grilla.Recordset = RST grilla.Refresh Else Call Conectar("Select * from infocuota where fechadepago like'" & DateValue(txtbuscar.Text) & "%' " 'Actualiza la grilla Set grilla.Recordset = RST grilla.Refresh End If End Sub Y lo que hace es dejarme la grilla vacía, o sea como que NO ENCONTRÓ nada con ese valor ingresado. Ya probé de 1000 maneras distintas y no consigo como hacer. No sabría si el formato de la fecha esta mal o que. Espero que me puedan dar una mano. Saludos! |