Consultar Campo Fecha por Parametro utilizando ADOConexion

[novato_erick]

Hola a Todos:

Pasar de componente DBExpress a ADO es un paso que crei que seria sencillo.

Sucede que tengo una pequeña base de Dato en SQL Server 2005 en el que tengo que realizar una consulta por fecha seleccionada:

Tengo mi ADOQuery el cual en su propiedad String escribí lo siguiente:

Código SQL [-]
select userid, checktime from checkinout where checktime =:fecha

ahora en mi botón buscar practicamente hice esto:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
buscafecha : TDateTime;
begin
 buscafecha := DateTimePicker1.DateTime;
 ClientDataSet2.Close;
 with ADOQuery2 do
 begin
   Close;
   sql.Clear;
   sql.Add('select userid, checktime from checkinout where checktime =:fecha');// aquí no se si es lo correcto
   Parameters.ParamByName('fecha').Value := buscafecha;
   open;
 end;
 ClientDataSet2.Open;
end;

Pero al final solamente me activa mi ClientDataSet...


Alguna sugerencia

Saludos

novato_erick

[[Caral]]

Hola
A que tienes conectado el adoquery?
Saludos

[[Caral]]

Hola
No uso clientdataset, pero:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
begin
 ClientDataSet2.Close;
 with ADOQuery2 do
 begin
   Close;
   sql.Text:= 'select userid, checktime from checkinout where checktime = :fecha'
   Parameters[0].Value := DateTimePicker1.DateTime;
   open;
   ClientDataSet2.Open;
 end;
 
end;

Saludos

[novato_erick]

Hola Caral Gracias por responder:

Lo tengo conectado al componente ADOConnection1 y a que te refieres con:

Caral dice:
Hola
No uso clientdataset, pero:

Saludos

novato_erick

[novato_erick]

en mi Base de datos en SQL 2005 tengo en la Tabla CHECKINOUT CAMPO CHECKTIME guardado lo siguiente: 08/01/2012 09:20:11 a.m.

he notado que tal vez me hace falta la hora para traer la consulta idéntica pero es algo que no es posible ya que necesito que me muestre los datos específicamente en esa fecha independientemente la hora ya que son marcas de empleados realizados en un relog biometrico.


Saludos

[novato_erick]

Bueno ya entendí cuando quisiste decir que no usas el ClientDataSet

bueno lo hice ahora de esta manera siguiendo las sugerencia en este linck: http://www.clubdelphi.com/foros/show...34&postcount=7

Código Delphi [-]
procedure TForm1.Button2Click(Sender: TObject);
begin
with ADOQuery3 do
  begin
    Close;
    SQL.Clear;
    SQL.Add('select userid, checktime from checkinout where checktime =:fecha');
    Parameters.ParamByName('fecha').Value:= FormatDateTime('dd/mm/yyyy',DateTimePicker2.Date);
    Open;
  end;
end;

Pero el resultado es el mismo... nada me trae jejejeje...


Saludos

novato_erick