jocey
28-11-2007, 14:21:33
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
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;
Jocey
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;