RUN TIME ERROR 94
Pessoal , fiz uma atualizacao a qual coloquei um novo campo data
só que esse capo está vazio perantes todas linhas de registros gravados
e no cliente deu erro Invalid use of null , run time error 94
acredito que o erro seja pelo novo campo data
a verificacao que acredito que o ocorra o erro é esse onde text10 deveria ter o valor campo data_pagamento
If Text10.Text = Text8.Text Then
.... pensando com meus botoes um escape seria fazer uma rotina , preeenchendo todos campos ... apenas é a ultima hipotese
como faço pra tratar esse erro
sera que tem a ver com esse novo campo data , a qual faço uma verificacao e ele me da o erro
Abs
Obg
Marcelo Fazan
só que esse capo está vazio perantes todas linhas de registros gravados
e no cliente deu erro Invalid use of null , run time error 94
acredito que o erro seja pelo novo campo data
a verificacao que acredito que o ocorra o erro é esse onde text10 deveria ter o valor campo data_pagamento
If Text10.Text = Text8.Text Then
.... pensando com meus botoes um escape seria fazer uma rotina , preeenchendo todos campos ... apenas é a ultima hipotese
como faço pra tratar esse erro
sera que tem a ver com esse novo campo data , a qual faço uma verificacao e ele me da o erro
Abs
Obg
Marcelo Fazan
como em outros exemplo vc deve tratar campos nulos
então na função insert tratar o campo nulo
ex:
sql = [Ô]INSERT INTO tabela (data_pagamento) VALUES ([Ô] & IIF(Text10.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Text10.Text,[Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô])[Ô]
e é isso
apenas um exemplo verifique sua função insert
então na função insert tratar o campo nulo
ex:
sql = [Ô]INSERT INTO tabela (data_pagamento) VALUES ([Ô] & IIF(Text10.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Text10.Text,[Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) & [Ô])[Ô]
e é isso
apenas um exemplo verifique sua função insert
Olá Marcelo Treze ...
esse campo, ele somente importa data
no caso nao grava ele importa do TXT
preciso somente verificar , acho entao que seria em 2 lugares
If IIF(Text10.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Text10.Text,[Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) = Text8.Text Then
entao ficaria a verificação algo assim ????
e aqui algo assim ???
Do Until Tabela.EOF
if text10.text = Null then
Campo Nulo Passo sem Erro
else
Text10.Text = Tabela([Ô]pagamento[Ô])
endif
Tabela.MoveNext
Loop
Tabela.Close
Realmente nao tem como tratar campo data nulo no acess ???
Obrg Abs
Marcelo Fazan
esse campo, ele somente importa data
no caso nao grava ele importa do TXT
preciso somente verificar , acho entao que seria em 2 lugares
If IIF(Text10.Text = [Ô][Ô], [Ô]NULL[Ô], [Ô]#[Ô] & Format(Text10.Text,[Ô]mm/dd/yyyy[Ô]) & [Ô]#[Ô]) = Text8.Text Then
entao ficaria a verificação algo assim ????
e aqui algo assim ???
Do Until Tabela.EOF
if text10.text = Null then
Campo Nulo Passo sem Erro
else
Text10.Text = Tabela([Ô]pagamento[Ô])
endif
Tabela.MoveNext
Loop
Tabela.Close
Realmente nao tem como tratar campo data nulo no acess ???
Obrg Abs
Marcelo Fazan
veja bem se vc est;a apenas exibindo o campo data uma forma que poucos conhecem é esta
veja, não faça verificação nenhuma, coloque apenas um & [Ô][Ô]
assim
Text10.Text = Tabela([Ô]pagamento[Ô]) & [Ô][Ô]
pronto teste
veja, não faça verificação nenhuma, coloque apenas um & [Ô][Ô]
assim
Text10.Text = Tabela([Ô]pagamento[Ô]) & [Ô][Ô]
pronto teste
Tópico encerrado , respostas não são mais permitidas