Código Delphi [-] Var dHoy:TDate; Begin dHoy:=Date; Select * From MiTabla Where Vencimiento > dhoy -6 And Vencimiento <= dhoy ...
Var dHoy:TDate; Begin dHoy:=Date; Select * From MiTabla Where Vencimiento > dhoy -6 And Vencimiento <= dhoy ...