Ver Mensaje Individual
  #7  
Antiguo 01-06-2015
DANIEL1818 DANIEL1818 is offline
Miembro
NULL
 
Registrado: abr 2015
Posts: 42
Reputación: 0
DANIEL1818 Va por buen camino
Filtrado en Sql por fechas

Hola! disculpen las molestias, pero vengo con un problema que no puedo solucionar e hice pruebas con información que encontré en google y en esta pagina pero no tuve éxito.
El problema es: tengo una tabla de productos en ACCESS 2010 el cual tiene titulo del producto, categoria, fecha_inicio, fecha_fin (las fechas son en las que el producto estará disponible), a la hora de filtrar por fechas es cuando tengo el problema. Tengo un Query y un data source conectado al Query, el Query esta activado. Necesitaría si por favor me dan una mano con esto ya que no puedo encontrar las solución.

Mi código en Dephi 2010:
Código Delphi [-]
//Filtro por titulo, NO filtro por categoria, y SÍ filtro por fechas.
if  (Form1.Edit1.Text <> ' ') 
and (Form1.ComboBox1.ItemIndex = -1)
and (CompareDate(EncodeDate(2000,1,1), Form1.DateTimePicker2FechaHasta.Date) <> 0) then 
begin  
     DM.Query_soloTituloConFecha.Close;
     DM.ds_queryCategorias.DataSet:=DM.Query_soloTituloConFecha;
     DM.Query_soloTituloConFecha.Parameters.ParamByName('elString').Value:=Form1.Edit1.Text;
     DM.Query_soloTituloConFecha.Parameters.ParamByName('fechaIni').Value:=DateToStr(Form1.DateTimePicker  1FechaDesde.Date);
     DM.Query_soloTituloConFecha.Parameters.ParamByName('fechaFin').Value:=DateToStr(Form1.DateTimePicker  2FechaHasta.Date);
     DM.Query_soloTituloConFecha.Open;
end ;
y mi código SQL en el Query_soloTituloConFecha es :
Código Delphi [-]
SELECT S.titulo, S.descripcion_producto, S.precio_base, S.fecha_inicio, S.fecha_fin, S.foto
from Subasta_prod S
where (S.titulo like :elString) and (S.fecha_inicio >= :fechaIni) and (S.fecha_fin <= :fechaFin)
Me podrian ayudar? Se los agradeceria muchisimo!

Última edición por nlsgarcia fecha: 02-06-2015 a las 00:44:31. Razón: Formateo y Sintaxis Delphi.
Responder Con Cita