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]update funciona mas não compila

    Compartilhe

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    [Resolvido]update funciona mas não compila

    Mensagem  charlehardware em 24/12/2016, 01:17

    Function BotaoSalvarPermicoes()
    'On Error Resume Next       ' Bom para variaves vasias
    'DoCmd.SetWarnings False    ' Bom para evitar msg record db
    Dim StrSQL As String

       StrSQL = "UPDATE Funcionario" _
       & "SET XM_Inicial = '" & TxtXM_inicial & "', XM_Cadastro = '" & TxtXM_Cadastro & _
       "', XTodos = '" & Me.TxtXTodos & "', XM_Configuracoes = '" & Me.TxtXM_Configuracoes & _
       "', XM_R1 = '" & Me.TxtXM_R1 & "', XM_R2 = '" & Me.TxtXM_R2 & _
       "', XPagarContas = '" & Me.TxtXPagarContas & _
       "', XProduto = '" & Me.TxtXProduto & _
       "', XrEntrada = '" & Me.TxtXrEntrada & _
       "', XRegistro = '" & Me.TxtXRegistro & _
       "', XRestoque = '" & Me.TxtXRestoque & _
       "', XEntrada = '" & Me.TxtXEntrada & _
       "', XRVendas = '" & Me.TxtXRVendas & _
       "', XM_R3 = '" & Me.TxtXM_R3 & _
       "', XDicasMEI = '" & Me.TxtXdicasmei & _
       "', XConfiguracoes = '" & Me.TxtXConfiguracoes & _
       "', XCadastracontas = '" & TxtXCadastracontas & _
       "', XFuncionario = '" & Me.TxtXFuncionario & _
       "', XLocalizador = '" & Me.TxtXlocalizador & _
       "', XMesa = '" & Me.TxtXMesa & _
       "', XM_Contas = '" & TxtXM_Contas & _
       "', XRbruto_liquido = '" & Me.TxtXRBruto_liquido & _
       "', XMinhaEmpresa = '" & Me.TxtXMinhaEmpresa & _
       "', XOs = '" & Me.TxtXOs & _
       "' WHERE CodFuncionario = " & Me.txtCod & ";"
        DoCmd.RunSQL StrSQL ' executa as ações
             
       Call BeepOnce(0, 0)
       MsgBox ("Permições atualizadas com sucesso!"), vbInformation + vbOKOnly, "SoftFacil"
                     
    DoCmd.SetWarnings True
    End Function

    a mensagem do erro parece obvia: "método ou membro de dados não encontrada" e sempre da no ultimo campo a atualizar
    nesse caso foi no "', XOs = '" & Me.TxtXOs & _   sublinhado Me.TxtXOs  sendo que os dois existe tanto que funciona só não compila
    avatar
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3904
    Registrado : 14/08/2013

    Re: [Resolvido]update funciona mas não compila

    Mensagem  FabioPaes em 24/12/2016, 01:25

    Amigo, todas as vezes que vi esse erro e pq o Nome do Campo Estava errado...

    Agora acredito esta faltando um Espaço na primeira linha:
    StrSQL = "UPDATE Funcionario " _ '<==Foi colocado um Espaço apos a tabela.

    Agora, coloque sua tabela que recebera os dados, em modo designer e veja se esse Campo esta exatamente com esse nome.



    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4113
    Registrado : 20/04/2011

    Re: [Resolvido]update funciona mas não compila

    Mensagem  Silvio em 24/12/2016, 01:29

    StrSQL = "UPDATE Funcionario " &_


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    [Você precisa estar registrado e conectado para ver este link.]

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    update funciona mas não compila

    Mensagem  charlehardware em 25/12/2016, 22:19

    Não é digitação, pois funciona só não compila, gosto de trabalhar com campos não acoplados, mas nesse caso apenas no subform vinculei os campos e voltei a usar o velho UNDO, OU seja solução alternativa, valeu a todos pela prontidão.
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7030
    Registrado : 05/11/2009

    Re: [Resolvido]update funciona mas não compila

    Mensagem  Alexandre Neves em 28/12/2016, 18:43

    Boa tarde
    Se resolveu, marque o Resolvido


    .................................................................................
    Access 2010. Mande bd que dê para testar (indique a versão). Não peça para fazer o que já tem feito. Dê todos os detalhes.
    Não coloquem entraves como senhas, esconder controlos, etc. Disponibilizem o mais limpo possível
    Só respondo a mensagens privadas, se forem de assunto privado; às outras não respondo.
    Quem trabalha e mata a fome não come o pão de ninguém; mas quem não trabalha e come, come sempre o pão de alguém. António Aleixo

    charlehardware
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/01/2011

    ok

    Mensagem  charlehardware em 2/2/2018, 16:15

    ok

      Data/hora atual: 14/11/2018, 11:52