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

    avatar
    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 Empty [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
    FabioPaes
    FabioPaes
    Moderador
    Moderador

    Respeito às Regras 100%

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

    [Resolvido]update funciona mas não compila Empty 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!
    Silvio
    Silvio
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]update funciona mas não compila Empty 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.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    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 Empty 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.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    [Resolvido]update funciona mas não compila Empty 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
    avatar
    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 Empty ok

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

    ok

      Data/hora atual: 20/4/2019, 21:49