laureanonunes, seu problema é com o driver ODBC ou alguma configuração.. eu já usei DBgo com SQL Server e o método clear funciona..
outra coisa.. cara.. esquece ADO/ODBC, usa algo nativo e se você precisar para algum engine de relatório como o Crystal... faz só a parte de relatorios. quanto ao resto do sistema.. usa Zeos, UniDac, PgDac;;; qualquer coisa menos ADO/ODBC DbExpress e afins... você vai ver.. vai ser só tranquilidade e desempenho. 2009/2/13 <laureanonu...@yahoo.com.br> > Colega Moacir, > > Sua solução vai funcionar, mas estou iniciando um projeto grande, onde > utilizarei vários "campos de data" nos forms, esse tipo de técnica de "IF", > > vai ser trabalhosa por demais, pois se eu considerar que além de tratar os > Inserts também deverei tratar os Updates e para dar manutenção não vai ser > prático. > > Acredito que deva existir uma maneira simples de declarar via parametro o > valor nulo, mas a três dias busco no Google de maneiras diferentes e nada. > > Sinceramente agradeço pelos emails e pela boa vontade em ajudar. > > Qualquer ajuda é bem-vinda, muito obrigado. > > []´s Nunes. > Pg 8.2, Delphi 2007 + ADO > > ----- Original Message ----- > From: "Moacir - GMail" <prism...@gmail.com <prismars%40gmail.com>> > To: <delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>> > Sent: Thursday, February 12, 2009 9:41 PM > Subject: Re: [delphi-br] ADO ( DBGO ) - Como passar data nula ao banco? > > Quem sabe um IF não te ajuda nisto ?? > > Tipo, > With MeuComponenteADO do > begin > sql.text:=' Insert into tabela (campo1, campo2'+ > IfThen(DATAEHNULA, '',',CampoData')+ > ') values (:campo1,:campo2'+ > IfThen(DATAEHNULA, '',',:CampoData')+ > ')'; > If not DATAEHNULA then > ParamByName('CampoData').AsDateTime:= EditQueTemA Data; > end; > > ??? > > Abraços, espero ter ajudado !! > > Moacir > > laureanonu...@yahoo.com.br <laureanonunes%40yahoo.com.br> escreveu: > > Colega Moacir, > > > > "query.Parameters.ParamByName('dt_inclusao').clear !!!!!!!!!!!!!!!!" > > > > Não funciona mesmo, em BDE tranquilo, em ADO/DBGO não vai. > > > > Estou utilizando ADO/DBGO!!!!!!!!!!!!!!!!!!!!!!!! > > > > Qualquer ajuda é bem-vinda, muito obrigado. > > > > []´s Nunes. > > Pg 8.2, Delphi 2007 + ADO > > > > ----- Original Message ----- > > From: "Moacir - GMail" <prism...@gmail.com <prismars%40gmail.com>> > > To: <delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br>> > > Sent: Thursday, February 12, 2009 8:33 PM > > Subject: Re: [delphi-br] ADO ( DBGO ) - Como passar data nula ao banco? > > > > > > > >> query.Parameters.ParamByName('dt_inclusao').clear !!!!!!!!!!!!!!!! > >> > >> > >> > >> > >> jrsilvas...@yahoo.com.br <jrsilvasjrp%40yahoo.com.br> escreveu: > >> > >>> Tenta query.Parameters.ParamByName('dt_inclusao').asvariant := null; > >>> > >>> > >>> > >>> ----- Original Message ----- > >>> From: laureanonu...@yahoo.com.br <laureanonunes%40yahoo.com.br> > >>> To: delphi-br@yahoogrupos.com.br <delphi-br%40yahoogrupos.com.br> > >>> Sent: Thursday, February 12, 2009 9:32 AM > >>> Subject: [delphi-br] ADO ( DBGO ) - Como passar data nula ao banco? > >>> > >>> > >>> Colegas, > >>> > >>> Eu estou com um problema para passar datas nulas ao banco via > >>> ADO/DBGO. > >>> > >>> O ADO ( DBGO ) nao aceita: > >>> > >>> query.Parameters.ParamByName('dt_inclusao').clear. > >>> > >>> nem tampouco... > >>> > >>> query.Parameters.ParamByName('dt_inclusao').value := null; > >>> > >>> Como devo proceder para passar a data para o banco com valor nulo? > >>> > >>> Qualquer ajuda é bem-vinda, muito obrigado. > >>> > >>> []´s Nunes. > >>> Pg 8.2, Delphi 2007 + ADO > >>> > >>> > >>> > >>> > >> ------------------------------------ > >> > >> -- > >> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > >> > >> > >> > >> > >> __________ Informao do ESET NOD32 Antivirus, verso da vacina 3846 > >> (20090211) __________ > >> > >> A mensagem foi verificada pelo ESET NOD32 Antivirus. > >> > >> http://www.eset.com > >> > >> > >> > >> > > > > __________________________________________________ > > Fa�a liga��es para outros computadores com o novo Yahoo! Messenger > > http://br.beta.messenger.yahoo.com/ > > > > > > ------------------------------------ > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > ------------------------------------ > > -- > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>> > > __________ Informao do ESET NOD32 Antivirus, verso da vacina 3846 > (20090211) > __________ > > A mensagem foi verificada pelo ESET NOD32 Antivirus. > > http://www.eset.com > > > _______________________________________________________ > Yahoo! Mail - Sempre a melhor op�ão para você! > Experimente já e veja as novidades. > http://br.yahoo.com/mailbeta/tudonovo/ > > -- ....................................................... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo....@gmail.com Site: http://www.drdsistemas.com.br/ ....................................................... [As partes desta mensagem que não continham texto foram removidas]