Campo Filter de ADOTable

[Sr.Scorpion]

Bueno al parecer me explique mal....

Tengo varios registros y quiero registrarlos todos por un mismo Mes.... y segun la solucion que me das es solo para los registros con la fecha q di al inicio

[Nelet]

Así creo que valdría:

Código Delphi [-]
ADOQuery1.Open;
ADOQuery1.Filter := 'Month(FECHA)= '+Edit1.Text;
ADOQuery1.Filtered := True;

En el edit deberías poner el año a buscar.

[Onti]

Empezado por Nelet

En el edit deberías poner el año a buscar.

No deberia poner el mes?
(ademas asumimos todas la fechas están el mismo año)

[Nelet]

Empezado por Onti

No deberia poner el mes?
(ademas asumimos todas la fechas están el mismo año)

Pues si....pero acabo de comer y llevo una torta monumental. Mea culpa.

Empezado por Sr.Escorpion

Ya eso lo habia probado con anterioridad y no funciona... no obstante estoy usando un ADOTable, no un ADOQuery

Bueno...con el ADOTable es igual, incluso tiene más sentido usar el Filter. Pero, ¿por que no te funciona?. ¿Te da algún error?. Quzá dependa del tipo de BD.

[Sr.Scorpion]

Empezado por Nelet

Pues si....pero acabo de comer y llevo una torta monumental. Mea culpa.


Bueno...con el ADOTable es igual, incluso tiene más sentido usar el Filter. Pero, ¿por que no te funciona?. ¿Te da algún error?. Quzá dependa del tipo de BD.

El error que me da dice... Argumentos incorrectos. Fuera del Intervalo permitido o en conflicto con otros...

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)= '+ '03';
ADOTable.Filtered:= True;

FCompra es el campo guardado en una BD de Access con el formato de fecha corta Ejemplo: 31/01/2007

Si ya tu hicistes la prueba por favor enviame el codigo.... por lo menos el que me pusistes arriba es un ADOQuery no un ADOTable

[Nelet]

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)= '+ '03';
ADOTable.Filtered:= True;

ese

Código Delphi [-]
+'03';

no me gusta nada.

Prueba así:

Código Delphi [-]
ADOTable.Filtered:= False;
ADOTable.Filter:= 'Month(FCompra)=3';
ADOTable.Filtered:= True;

El mes es de tipo numérico y tu le estás pasando un string.

[Sr.Scorpion]

Empezado por Nelet

Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'Month(FCompra)= '+ '03'; ADOTable.Filtered:= True;

ese Código Delphi [-]+'03';

no me gusta nada.

Prueba así:

Código Delphi [-]ADOTable.Filtered:= False; ADOTable.Filter:= 'Month(FCompra)=3'; ADOTable.Filtered:= True;

El mes es de tipo numérico y tu le estás pasando un string.

Tampoco funciona... sigue dando el mismo mensaje... al parecer estamos dando vuelta en circulos y tirando piedras... creo que es muy dificil que funcione tu solucion segun lei en la ayuda en la propiedad Filter se pone el CAMPO y despues lo que le quieres asignar por lo que... si le pones Month(FCompra) el va a buscar en la DB un campo llamado asi, a lo mejor en el ADOQuery te funciono porque entiende la funcion Month pero no pasa igual en el ADOTable

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

Gracias

[luisgutierrezb]

Empezado por Sr.Scorpion

El error que me da dice... Argumentos incorrectos. Fuera del Intervalo permitido o en conflicto con otros...

A mi me da ese error por intentar filtrar una tabla que ya viene con "order by" desde la instruccion SQL, puedes usar la propiedad sort del adotable para ordernar el dataset y asi poder usar el filter

[Sr.Scorpion]

Ya eso lo habia probado con anterioridad y no funciona... no obstante estoy usando un ADOTable, no un ADOQuery

Saludos