Imagina Alexsandro, estamos aí para isso. Mas como eu te falei em todos os post´s, alguma coisa estava errada no formato de data do seu servidor de produção. Aí tinha que ver no banco e tratar na aplicação.
Mas tá valendo. 2009/3/26 Alexsandro <a...@ig.com.br> > Bom dia Humberto, > > O problema foi resolvido, graças ao saudoso Juliano Kappesberg do forum > mssql-l que participo. > > Ele citou que : > " > Provavelmente sua conexao esta com a data setada para um formato > incompativel com o que vc esta passando, tente > setar o default language nas configurações do banco de dados ou coloque a > instrução "set language brazilian" antes do select." > > ai eu coloquei assim : > > AdoqFeriados.SQL.Text := 'set language brazilian SELECT * FROM tb_Feriados > WHERE data=' + Quot ...... > > E funcionou filé > > Humberto, muito Obrigado veio... > > --- Em delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>, > 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] > > > > > [As partes desta mensagem que não continham texto foram removidas]