Opa Humberto, Ele me traz o valor correto 31/03/2009 O interessante de tudo é que, aqui na minha máquina ele funciona blz. Ou seja quando eu uso o banco de dados de testes da minha máquina fica blz, agora quanto eu uso o banco de dados do Servidor.. da esse erro.
Uso SQL Server 2003 --- Em [email protected], Humberto Oliveira <holiveira.wordpr...@...> escreveu > > Alexsandro, conseguiu debugar e verificar o que está passando para a > variável "sdata" ? > > Coloca um ShowMessage(AdoqFeriados.SQL.Text); antes do AdoqFeriados.Open e > capture a query que ele está tentando executar, provavelmente a variável > está gravando um valor incorreto. > > Faça o teste e nos apresente os detalhes. > > > 2009/3/24 Alexsandro <a...@...> > > > Bom dia pessoal, > > > > Eu estou fazendo uma pesquisa em uma adoquary para encontrar determinadas > > datas e esta dando esse erro quando execulto a quary: > > > > conversion of a char data type to a datetime data type resulted in an > > out-of-range datetime value.. > > > > O código é esse : > > > > var resul tdatetime; > > sdata : string; > > begin > > > > AdoqFeriados.Close; > > AdoqFeriados.SQL.Clear; > > AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data='''+ sdata > > +''''; > > AdoqFeriados.Open; > > > > já tentei o : > > > > AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + > > QuotedStr(DateToStr (resul)); > > > > outra tentativa tambem foi o : > > > > AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + > > DateToStr (resul); > > > > Outra : > > AdoqFeriados.SQL.Text := 'SELECT * FROM tb_Feriados WHERE data=' + > > QuotedStr (sdata); > > > > e nada ... > > Alguem pode me ajudar com isso ? > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] >

