consulta a campo datetime de access usando adoquery

[JESUSNET]

he usado todo tipo de codigo hasta con formatdatetime y nada pero aqui esta uno de los que he usado:

datamodule2.ADOQueryrepresultados.Close;
datamodule2.ADOQueryrepresultados.SQL.Clear;
datamodule2.ADOQueryrepresultados.SQL.Add('Select * from resultados_emitidos,pacientes,convenios');
datamodule2.ADOQueryrepresultados.SQL.Add('where resultados_emitidos.cedula_paciente=pacientes.cedula');
datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.codigo_convenio = convenios.codigo');
datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.fecha_emision=:fecha_emision');
parametro2:=now;
datamodule2.ADOQueryrepresultados.Parameters[0].Value := ''+parametro2+'';
datamodule2.ADOQueryrepresultados.Open;

[[enecumene]]

A ver, A ver, intenta este codigo:

Código Delphi [-]
 datamodule2.ADOQueryrepresultados.Close;
   datamodule2.ADOQueryrepresultados.SQL.Clear;
   datamodule2.ADOQueryrepresultados.SQL.Add('Select * from resultados_emitidos,pacientes,convenios');
   datamodule2.ADOQueryrepresultados.SQL.Add('where resultados_emitidos.cedula_paciente=pacientes.cedula');
   datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.codigo_convenio = convenios.codigo');
   datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.fecha_emision=:fecha_emision');
   datamodule2.ADOQuery1.Parameters.ParamByName('fecha_emision').value := DateTimePicker1.Date;
   datamodule2.ADOQueryrepresultados.Open;

jooooseph, trata de usar las etiquetas delphi, para que se vean mejor, prueba el codigo y luego me comentas.

Saludos.

[JESUSNET]

lo acabo de intantar pero solo funciona si la fecha es mayor o igual si mle digo buscame los de la fecha 12/12/2000( que coloco en datetimepicker1) no me aparece nada pero sí existen registros con esa fecha gracias por responder ¿otra idea?

[[enecumene]]

Hola, lo que quieres es una consulta entre fecha? si es asi intenta lo siguiente:

Código Delphi [-]
datamodule2.ADOQueryrepresultados.Close;
   datamodule2.ADOQueryrepresultados.SQL.Clear;
   datamodule2.ADOQueryrepresultados.SQL.Add('Select * from resultados_emitidos,pacientes,convenios');
   datamodule2.ADOQueryrepresultados.SQL.Add('where resultados_emitidos.cedula_paciente=pacientes.cedula');
   datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.codigo_convenio = convenios.codigo');
   datamodule2.ADOQueryrepresultados.SQL.Add('and fecha1 >= :fecha_emision and fecha2<= :fecha2');
   datamodule2.ADOQuery1.Parameters.ParamByName('fecha1').value := DateTimePicker1.Date;
   datamodule2.ADOQuery1.Parameters.ParamByName('fecha2').value := DateTimePicker2.Date;
   datamodule2.ADOQueryrepresultados.Open;

intenta tambien este:

Código Delphi [-]
datamodule2.ADOQueryrepresultados.Close;
   datamodule2.ADOQueryrepresultados.SQL.Clear;
   datamodule2.ADOQueryrepresultados.SQL.Add('Select * from resultados_emitidos,pacientes,convenios');
   datamodule2.ADOQueryrepresultados.SQL.Add('where resultados_emitidos.cedula_paciente=pacientes.cedula');
   datamodule2.ADOQueryrepresultados.SQL.Add('and resultados_emitidos.codigo_convenio = convenios.codigo');
   datamodule2.ADOQueryrepresultados.SQL.Add('and fecha1 >= "'+Fecha1.text+'" and fecha2<= "'+fecha2.text+'" ');
   datamodule2.ADOQueryrepresultados.Open;

y ahora? luego me comentas.

Saludos.