ActiveDelphi

[Raphael007]

Ola pessoal.........
Como fasso para consultar Data e Hora.
Ex:
DM.CdsConsulta.Close;
With DM.qryConsulta Do
begin
Close;
Sql.Clear;
Sql.Add('Select Distinct V.DATA_VEN,P.DESC_PAG,');
Sql.Add(' P.VALOR_PAG ');
Sql.Add('From VENDAS V,PAGAMENTOS P ');
Sql.Add('Where V.ID_VEN = P.ID_VEN ');
Sql.Add(' And V.DATA_VEN BETWEEN :INI AND :FIN');
Params[0].AsDateTime := StrToDateTime('27/07/2010 09:00');
Params[1].AsDateTime := StrToDateTime('27/07/2010 10:00');
Open;
DM.CdsConsulta.Open;
ta dando esse erro unknown ISC error 0
e se eu coloco AsDate ele ñ acha nenhum item
obs: dentro do banco fiz essa pesquisa a diferença e que dentro do banco no lugar de 27/07/2010 é 27.07.2010 e sei q esse erro o do proprio banco q ñ esta reconhecendo ñ sei como posso formartar de algum jeito que o banco aceite
meu banco e FireBird 2.0

[felipecaputo]

já passei por esse erro diversas vezes.

tente criar estes parametros nas propertys da query pq o firebird interpreta de forma diferente date, time e timestamp
_________________
if Post.State = psResolvido then
Post.Caption := Post.Caption + ' [RESOLVIDO]';
_____________________________________________
O único homem que está isento de erros, é aquele que não arrisca acertar. Albert Einstein

[pestana]

Eu não consegui entender! Você quer consultar registros atraves de um perioldo de data e hora? O usuário informa a "data e hora" e retorna os registros que atendem as condições.

Outra coisa. O formato de data é este mesmo?
_________________
Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso.

[Raphael007]

Continua o mesmo erro olha como ficou o codigo
Ex:
DM.CdsConsulta.Close;
With DM.qryConsulta Do
begin
Close;
Sql.Clear;
Sql.Add('Select Distinct V.DATA_VEN,P.DESC_PAG,');
Sql.Add(' P.VALOR_PAG ');
Sql.Add('From VENDAS V,PAGAMENTOS P ');
Sql.Add('Where V.ID_VEN = P.ID_VEN ');
Sql.Add(' And V.DATA_VEN BETWEEN :INI AND :FIN');
Params.Items[0].DataType := ftTimeStamp;
Params.Items[0].ParamType := ptInput;
Params.Items[1].DataType := ftTimeStamp;
Params.Items[1].ParamType := ptInput;
Params[0].AsDateTime := StrToDateTime('27/07/2010 09:00');
Params[1].AsDateTime := StrToDateTime('27/07/2010 10:00');
Open;
end;
DM.CdsConsulta.Open;

obs: é isso mesmo cara quero fazer uma consulta com Data e Hora

[pestana]

Se eu não me engano o formato de data está errado. Tente 'mm/dd/yyyy hh:mm:ss'. Pode ser que este erro ocorre por causa do formato ou não. É que existe outros causadores para este erro.

Você testou no banco com estas datas e horas '27/07/2010 09:00' e '27/07/2010 10:00'. Funcionou?
_________________
Ao invés de ficar desanimado no que deu de errado, olhe para frente, aprenda com os erros e veja o que ainda pode ser feito. A determinação e a persistência é uma das etapas para o sucesso.