Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Impresión (https://www.clubdelphi.com/foros/forumdisplay.php?f=4)
-   -   AdoQuery y dos fechas (https://www.clubdelphi.com/foros/showthread.php?t=50795)

jocey 28-11-2007 14:21:33

AdoQuery y dos fechas
 
Antes que nada saludar a la noble sociedad del club, espero y deseo que todos esten bien, bueno, tengo un informe con QuickReport, pero que utilizo Adoquery, esta consulta que hago con el Adoquery con access como gestor de base de datos me trabaja de maravilla, pero si el gestor es SQl me da error diciendo que 'DateValue' no es un parametro soportado o algo parecido, les pongo aqui el codigo de como lo uso para access a ver si alquien me puede ayudar como seria en sql..... saludos de antemano

Jocey


Código:

procedure TFormprincipal.Button1Click(Sender: TObject);
var  dia1, dia2 : string;
begin
dia1 := DatetoStr(formprincipal.DateTimePicker1.Date);
dia2 := DatetoStr(formprincipal.DateTimePicker2.Date);
try
with formre do
formre.ADOQuery1.SQL.Add('WHERE (((incidencias.fechainicio) Between ''' + dia1 + ''' And ''' + dia2 + '''))');
formre.ADOQuery1.Open;
formre.QuickRep1.Preview;
{formre.DataSetre.Last;}
Finally
formre.QuickRep1.Free;
formre.ADOQuery1.Last;
{formre.ADOQuery1.Close;}
end;
end;



enecumene 28-11-2007 15:53:30

Hola, intentalo de esta manera:

Código Delphi [-]
procedure TFormprincipal.Button1Click(Sender: TObject);
begin
try
with formre do
formre.ADOQuery1.SQL.Add('WHERE (((incidencias.fechainicio) Between :dia1 And :dia2))');
formre.ADOQuery1.Params.ParamByName('dia1').value := DateTimePicker1.Date;
formre.ADOQuery1.Params.ParamByName('dia2').value := DateTimePicker2.Date;
formre.ADOQuery1.Open;
formre.QuickRep1.Preview;
{formre.DataSetre.Last;}
Finally
formre.QuickRep1.Free;
formre.ADOQuery1.Last;
{formre.ADOQuery1.Close;}
end;
end;

Espero que te ayude

Saludos.


La franja horaria es GMT +2. Ahora son las 12:51:01.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi