MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Ajuda com "CurrentDb.Execute INSERT INTO "

    Compartilhe

    José Faustino Filho
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 31
    Registrado : 31/12/2013

    [Resolvido]Ajuda com "CurrentDb.Execute INSERT INTO "

    Mensagem  José Faustino Filho em Dom 22 Jun - 16:39

    Olá pessoal, boa tarde!

    Estou tentando usar o código abaixo em um dos meus formulários, mas não está funcionando bem. Para inserir valores numéricos funfa legal, mas para

    palavras sempre dá uma erro informado que não é possível.

    Aqui está o código:

    CurrentDb.Execute "INSERT INTO tblExemplo([Campo1],[Campo2]) VALUES (""" & txtCampo1 & """, """ & txtCampo2 & """)", dbFailOnError

    Tentei assim também, mas não funcionou (ficou muito fraco, mas é a marquinha em vermelho!):

    CurrentDb.Execute "INSERT INTO tblExemplo([Campo1],[Campo2]) VALUES ('" & txtCampo1 & "', '" & txtCampo2 & "')", dbFailOnError


    Desde já agradeço pela ajuda!

    Att.

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Ajuda com "CurrentDb.Execute INSERT INTO "

    Mensagem  JPaulo em Seg 23 Jun - 9:22

    Teste assim por favor;

    CurrentDb.Execute "INSERT INTO tblExemplo (Campo1,Campo2) VALUES ('" & Nz(Me.txtCampo1.Value, 0) & "', '" & Nz(Me.txtCampo2.Value, 0) & "')"



    .................................................................................
    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.]

    José Faustino Filho
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 31
    Registrado : 31/12/2013

    Obrigado!

    Mensagem  José Faustino Filho em Seg 23 Jun - 13:48

    Obrigado mestre JPaulo, funcionou direitinho!

    Contudo, você pode me explicar (em linhas gerais) o porque deste "Nz" e também o pq do zero após a vírgula?

    Muito obrigado mesmo pela ajuda mestre, sou seu fã. Já aprendi muita coisa neste fórum através de seus exemplos e respostas!

    Um abraço!

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

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

    Re: [Resolvido]Ajuda com "CurrentDb.Execute INSERT INTO "

    Mensagem  JPaulo em Seg 23 Jun - 14:40

    Olá
    A função Nz faz o tratamento dos nulos, mas na sua instrução não funfava porque o campo1 e 2, estavam dentro de colchetes.


    .................................................................................
    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.]

    José Faustino Filho
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 31
    Registrado : 31/12/2013

    Re: [Resolvido]Ajuda com "CurrentDb.Execute INSERT INTO "

    Mensagem  José Faustino Filho em Seg 23 Jun - 15:52

    Perfeito mestre!

    Mais uma vez muito obrigado pela ajuda!!!

      Data/hora atual: Qua 7 Dez - 14:14