hola chente,...
si, mira mi consulta quedo lista anoche gracias a la ayuda de mascorrilla y quedo asi
Código:
VAR
MAS,SUM,MENOS:tdatetime;
dia,mes,anno:Word;
begin
DecodeDate(Date,anno,mes,dia);
MAS:=EncodeDate(anno,mes,1); //GUARDANDO MES ACTUAL CON DIA 1
SUM:=IncMonth(MAS,1);//SUMANDOLE UN MES AL MES ACTUAL
MENOS:=SUM-1; //RESTANDOLE UN DIA AL MES ACTUAL+1 (OSEA MES SIGUIENTE AL ACTUAL)
EDIT1.TEXT:=DATETOSTR(MAS);
EDIT2.TEXT:=DATETOSTR(MENOS);
QUERY4.CLOSE;
QUERY4.Params[0].AsDate := MAS;
QUERY4.Params[1].AsDate := MENOS;
QUERY4.OPEN;
y el código en sql me quedo asi
Código:
SELECT CONTEOINFRACCIONES.NUM_CONDUCTOR,FOLIOULTIMAINFRACCION,INFRACCION.NUMFOLIO, FECHAULTIMAINFRACCION, VECESINFRACCIONADO,NOMBRE, APE_PAT,APE_MAT,CONDUCTOR.NUM_CONDUCTOR, LICENCIA, NUMFOLIO, STATUS, FECHAINFRACCION, NUMINFRACCION
FROM CONTEOINFRACCIONES, CONDUCTOR, INFRACCION
WHERE VECESINFRACCIONADO>=1 AND CONTEOINFRACCIONES.NUM_CONDUCTOR = CONDUCTOR.NUM_CONDUCTOR AND FOLIOULTIMAINFRACCION=NUMFOLIO AND STATUS ='NO PAGADO' AND FECHAULTIMAINFRACCION BETWEEN :FECHAMAS AND :FECHAMENOS
muchas gracias por tu interes en ayudarme amigo.
Estoy usando Delphi 5... ahi arribita lo especifiqué, solo que como la page se hace muy grande, entonces no se alcanza a ver.
por cierto ando con otro problemita en una consulta, pero aun me sigo calentando la cabeza, creo que cuando ya de plano no pueda tendre que dar un grito de ayuda jejejeje
Eduardo...
Saludos