Campo Filter de ADOTable

[Nelet]

Empezado por Sr.Escorpion

Disculpenme si me equivoco... pero creo que es mejor q ustedes mismos hagan la prueban para q vean lo que les digo... rectifiquenme si me equivoco

Discúlpame tu a mi. En SQL Server si funciona, pero en Access, no. Me hace falta una siesta.

De todas formas si sabes el año y el mes que estás buscando he probado algo en access que si funciona:

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'FCompra >= FECHA_INICIAL AND FCompra <= FECHA_FINAL';
ADOTable.Filtered:= True;

En access es lo único que se me ocurre que puedas hacer. Las fechas inicial y final deberás calcularlas dado un mes o un año.

Espero te sirva.

[Sr.Scorpion]

Empezado por Nelet

Discúlpame tu a mi. En SQL Server si funciona, pero en Access, no. Me hace falta una siesta.

De todas formas si sabes el año y el mes que estás buscando he probado algo en access que si funciona:
Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'FCompra >= FECHA_INICIAL AND FCompra <= FECHA_FINAL'; ADOTable.Filtered:= True;


En access es lo único que se me ocurre que puedas hacer. Las fechas inicial y final deberás calcularlas dado un mes o un año.

Espero te sirva.

Eso es lo que tengo implementado.... pero resulta un poco engorroso hacer eso para cada mes... sin contar que si en febrero poner 01/02/2007 hasta 31/02/2007 da error porque febrero llega hasta 28... y asi pasa con los demas meses que tienen 30 y 31 dias..... en fin resulta bastante codigo para hacer tan pequeña cosa

[[Caral]]

Hola
Disculpen pero no se donde esta el problema de filtrar dos fechas.
Con dos componentes DateTimePicker:

Código Delphi [-]
 ADOTable1.Open;
 ADOTable1.Filter := 'FCompra >= '+DateToStr(DateTimePicker1.DateTime)+' AND FCompra <= '+DateToStr(DateTimePicker2.DateTime);
 ADOTable1.Filtered := True;

y ya.
Tambien se puede hacer con dos edit igual.
Saludos

[Sr.Scorpion]

Empezado por Caral

Hola
Disculpen pero no se donde esta el problema de filtrar dos fechas.
Con dos componentes DateTimePicker:
Código Delphi [-] ADOTable1.Open; ADOTable1.Filter := 'FCompra >= '+DateToStr(DateTimePicker1.DateTime)+' AND FCompra <= '+DateToStr(DateTimePicker2.DateTime); ADOTable1.Filtered := True;

y ya.
Tambien se puede hacer con dos edit igual.
Saludos

el problema esta en poner dos componente para filtrar mientras que un combobox escoge el mes que quiera y me filtra

[[Caral]]

Bueno Sr.Scorpion
Segun tu planteamiento, tienes en un combobox los meses.
Enero
Febrero
etc.
y quieres que te filtre de esos meses.
Es correcto?
Yo lo que haria seria que al grabar la informacion en la tabla indicara en un campo el mes que quiero, asi lo filtraria facilmente, no se si me explico.
Saludos

[Sr.Scorpion]

Empezado por Caral

Bueno Sr.Scorpion
Segun tu planteamiento, tienes en un combobox los meses.
Enero
Febrero
etc.
y quieres que te filtre de esos meses.
Es correcto?
Yo lo que haria seria que al grabar la informacion en la tabla indicara en un campo el mes que quiero, asi lo filtraria facilmente, no se si me explico.
Saludos

Eso traeria consigo replantear todo un procedimiento en el llenado de la tabla... y seria como darse por vencido ante una dificultad. Por lo que creo mas sensato seguir trabajando en el filtrado antes de claudicar e ir por otra solucion....

[[Ivanzinho]]

Empezado por Sr.Scorpion

Eso es lo que tengo implementado.... pero resulta un poco engorroso hacer eso para cada mes... sin contar que si en febrero poner 01/02/2007 hasta 31/02/2007 da error porque febrero llega hasta 28... y asi pasa con los demas meses que tienen 30 y 31 dias..... en fin resulta bastante codigo para hacer tan pequeña cosa

Para evitarte eso puedes usar la función :

Código Delphi [-]
function EndOfAMonth ( const Year, Month : Word ) : TDateTime

Un saúdo