CHECKBOX NO INSERT INTO E POSSIVEL
O campo da Tabela está em qual formato? Se for SQL Server coloque o Formato Bit.
[Ô]INSERT INTO GERAL (IMPBOL) Values (5,[Ô] & Iif(chkStatus.Value = vbChecked, 1, 0) & [Ô])[Ô]
SERIA ASSIM?
SERIA ASSIM?
Isso ...
Tenta ai e posta o resultado ... flw
Tenta ai e posta o resultado ... flw
amigo tente
se campo for numerico:
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)Values([Ô] & NIMP &[Ô])[Ô]
se não
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)Values([ô][Ô] & NIMP &[Ô][ô])[Ô]
se campo for numerico:
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)Values([Ô] & NIMP &[Ô])[Ô]
se não
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)Values([ô][Ô] & NIMP &[Ô][ô])[Ô]
Teste sem a variável e veja se dá certo:
[txt-color=#0000f0]Dim Aquiav As Database
Set Aquiav = OpenDatabase([Ô]\\SERVIDOR\Dados.mdb[Ô])
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)[Ô] _
& [Ô]Values([Ô] & Check1.Value & [Ô])[Ô] [/txt-color]
[txt-color=#0000f0]Dim Aquiav As Database
Set Aquiav = OpenDatabase([Ô]\\SERVIDOR\Dados.mdb[Ô])
Aquiav.Execute [Ô]INSERT INTO GERAL (InfIncluir)[Ô] _
& [Ô]Values([Ô] & Check1.Value & [Ô])[Ô] [/txt-color]
Todos deram erro, eu resolvi com [Ô]UPDATE Set ImpBol=[ô][Ô] & NIMP & [Ô][ô] Where IDn=[ô][Ô] & NumLinha & [Ô][ô][Ô]
Funcionou
Grato a todos que colaboraram, vou deixar o Tópico aberto por mais um dia para comentários
Obrigado
Funcionou
Grato a todos que colaboraram, vou deixar o Tópico aberto por mais um dia para comentários
Obrigado
Qual era o erro que estava dando? Se funcionou no update o problema não era com a variável boleana...
[Ô]EU[Ô] quando preciso de tal informação crio um campo na tabela como STRING ai no click do chebox eu eu faço um IF pra e se ta 1 ou 0, se tiver 1 atribuo SIM e se tiver 0 atribuo NÃO e gravo na tabela numa boa hehhehe
Tópico encerrado , respostas não são mais permitidas