Ver Mensaje Individual
  #1  
Antiguo 19-05-2004
Vicsan Vicsan is offline
Registrado
 
Registrado: may 2004
Posts: 2
Reputación: 0
Vicsan Va por buen camino
Necesito ayuda con consulta SQL

Hola a todos, tengo que hacer una consulta SQL y me da un error en tiempo de ejecucion, el error es:

Capability not supported

y el codigo el siguiente:

procedure TfmBuscarCita.BtBuscarClick(Sender: TObject);
begin
with SBuscarCitas do begin
Close;
with SQL do begin
Clear;
Add('SELECT c.fecha as Fecha,c.hora as Hora,u.nombre as Fisioterapeuta ,c.nombre as Paciente');
Add('FROM "Citas.db" c, "usuarios.db" u');
Add(' WHERE fecha >= "'+ DateToStr(DTPInicio.date)+'" AND strtodate(fecha) <="'+DateToStr(DTPFin.Date)+'"');
Add(' AND "'+EditId_Usuario.text+'"=id_Usuario');
if(editNombrePaciente.Text<>'*') then Add(' AND Nombre = "'+editNombrePaciente.Text+'"');
Add(' AND c.id_Usuario=u.Id_Usuario');
Add(' ORDER BY c.fecha,c.hora');
end;//SQL
ExecSQL;
Open;
end;//Query
end;

El problema me lo da al añadir la linea subrayada. Creo q es por culpa de los formatos de la fecha, pero no lo se fijo. El formato tanto de fecha (que es un campo de la BD) como del del DTPInicio.date y DTPFin.date (son datetimepicker) es de tipo datetime.
Muchas gracias por vuestra ayuda.
Responder Con Cita