Cascudo! Select usando data do MonthCalendar (ADO/MSAccess)

Question

Amigos,Tavez voc� possa me ajudar?! :?Estou montando uma tela tipo MSOutlook onde ao clicar no dia � visualizado os compromissos relacionados. Estou usando um banco Access e ADO. O problema � o seguin...

Bon Jovi · Answer

Acho q Access n�o tem uma fun��o 100� segura pra converter data em string pra data em datetime. N�o uso Access pra aplica��es multiusu�rio e CDATE � seguro no caso de monousu�rio. Pelo menos nunca testei acessando remotamente, se a formata��o de data vale a do micro cliente ou do servidor.

Ex. CDATE:

var
  StrData: string;
begin
  StrData := FormatDateTime(ShortDateFormat, MC_Compromisso.Date);
  Q_Agenda.SQL.Text := 
    �Select * from Agenda � + 
    �where AgData = CDATE(� + StrData  + �) � + 
    �Order by AgHora�;
end;

Embora chato, o mais �certo� seria usar TParameters.

Cfino · Answer

Valeu pela dica vou tentar usar!A quest�o de usar Tparameters � que n�o entendi muito bem seu funcionamento e por isso tenho um pouco de dificuldade. Inclusive tentei nesse caso mas n�o saiu nada!!! :oops: Grato,Cfino....

Cfino · Answer

Na verdade Caro Bon Jovi quando acrescento o comando CDATE no Select ele para de funcionar!!!Se tiver outra id�ia agrade�o,Cfino....

Bon Jovi · Answer

Esqueci de colocar o QuotedStr

�where AgData = CDATE(� + QuotedStr(StrData) + �) � +

Se tiver guardando hora junto com a data em AgData, tem q fazer o seguinte:

�Select * from Agenda � +
�where AgData >= CDATE(� + QuotedStr(StrData) + �) � +
�and AgData <= CDATE(� + QuotedStr(StrData + � 23:59:59�) + �) � +
�Order by AgHora�;

Cfino · Answer

Valeu cara!!! J� virei seu f�!!!Obrigado pela ajuda,Cfino....

F�rum Cascudo! Select usando data do MonthCalendar (ADO/MSAccess) #235863