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]Consulta VBA x Atualizar com campo do formulário

    Compartilhe

    vinicius.anna
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 174
    Registrado : 29/04/2011

    [Resolvido]Consulta VBA x Atualizar com campo do formulário

    Mensagem  vinicius.anna em Qui 05 Dez 2013, 16:04

    Boa tarde

    Em um formulário desvinculado, possuo um campo texto (Alfanumérico), de 4 posições, chamado txtCodigo. Preciso fazer um update em um determinado campo da uma tabela usando como parâmetro o txtCodigo. Estou usando o código abaixo:

    CurrentDb.Execute "UPDATE tb_Sped SET tb_Sped.CodEmp = " & Me.txtCodigo & ";"

    Este código funciona, porém, se no campo txtCódigo, eu informar 0001, o campo da tabela CodEmp grava apenas o 1, não gravando o 0001. Alguém tem alguma dica de como posso fazê-lo?

    Att. Vinicius
    O autor desta mensagem foi removido do fórum - Ver a mensagem
    avatar
    Beto Givoni
    VIP
    VIP

    Respeito às Regras 0%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1207
    Registrado : 04/01/2011

    Re: [Resolvido]Consulta VBA x Atualizar com campo do formulário

    Mensagem  Beto Givoni em Qui 05 Dez 2013, 16:15

    Olá, coleque no formato do referido em sua tavela "0000" sem as aspas

    vinicius.anna
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 174
    Registrado : 29/04/2011

    Re: [Resolvido]Consulta VBA x Atualizar com campo do formulário

    Mensagem  vinicius.anna em Qui 05 Dez 2013, 17:20

    Boa tarde Beto,

    Obrigado,

    Mas acabou não dando certo, continua gravando o 1 ao invés de 0001.

    Att. Vinicius

    vinicius.anna
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 174
    Registrado : 29/04/2011

    Re: [Resolvido]Consulta VBA x Atualizar com campo do formulário

    Mensagem  vinicius.anna em Qui 05 Dez 2013, 18:19

    Beto,

    Boa tarde,

    Muito obrigado pela dica, consegui resolver com a linha:

    CurrentDb.Execute "UPDATE tb_Sped SET CodEmp ='" & Me.txtCodigo & "';"

    e a sua dica.

    Att. Vinicius
    O autor desta mensagem foi removido do fórum - Ver a mensagem

      Data/hora atual: Sex 20 Out 2017, 09:56