MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido]Gravar campo vazio

    Compartilhe

    guism
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 23
    Registrado : 05/11/2015

    [Resolvido]Gravar campo vazio

    Mensagem  guism em Qui 18 Fev 2016, 17:16

    Fala pessoal,

    To com um problemão. Tenho uma tabela "Desconto" que eu alimento por um formulário com campos não associados por meio de DAO.
    Inseri uns campos novos do tipo sim/não , mas acontece que quando o usuário não marca nenhum desses campos ele não grava nenhuma informação.
    Curiosamente, se marcar algum dos campos ele grava normalmente.
    Realmente não sei qual a lógica, se ele não lê nulos ou algo do tipo.
    O código está abaixo:

    Set db = CurrentDb

    Set rsDesconto = db.OpenRecordset("DESCONTO")

    rsDesconto.AddNew

    rsDesconto!beneficio = Form_frmLS.txtBeneficio
    rsDesconto!competencia = Me.txtCompetencia
    rsDesconto!periodoInicial = Me.txtPeriodoInicial
    rsDesconto!periodoFinal = Me.txtPeriodoFinal
    rsDesconto!referencia = Me.txtReferencia
    rsDesconto!paragrafo_Devolucao = Me.chkDevolucao
    rsDesconto!paragrafo_RevisaoDIB = Me.chkRevisaoDIB
    rsDesconto!DIB_BB = Me.txtDIB_BB

    rsDesconto.Update

    Form_frmDesconto.subFrmDescontos.Requery
    Me.Requery
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9697
    Registrado : 04/11/2009

    Re: [Resolvido]Gravar campo vazio

    Mensagem  JPaulo em Qui 18 Fev 2016, 17:41

    Ola;

    Use a função interna Nz para tratamento de nulos;

    Exemplo:
    Código:
    rsDesconto!paragrafo_Devolucao = Nz(Me.chkDevolucao, "")
    rsDesconto!paragrafo_RevisaoDIB = Nz(Me.chkRevisaoDIB, "")

    Ou se um valor para os nulos;;

    Código:
    rsDesconto!paragrafo_Devolucao = Nz(Me.chkDevolucao, 0)
    rsDesconto!paragrafo_RevisaoDIB = Nz(Me.chkRevisaoDIB, 0)

    Deveria usar para todos os tratamentos de nulos.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    guism
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 23
    Registrado : 05/11/2015

    Re: [Resolvido]Gravar campo vazio

    Mensagem  guism em Qui 18 Fev 2016, 19:10

    Obrigado, funcionou!
    avatar
    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 9697
    Registrado : 04/11/2009

    Re: [Resolvido]Gravar campo vazio

    Mensagem  JPaulo em Sex 19 Fev 2016, 10:09

    Fico feliz.

    Obrigado pelo retorno o forum agradece.


    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Sab 18 Nov 2017, 10:28