MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

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

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


4 participantes

    [Resolvido]Ao alterar um campo sim/Não

    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Ao alterar um campo sim/Não Empty [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Assis 6/12/2017, 15:00

    Boa tarde Amigos

    Preciso de uma ajuda ao alterar o campo "Bloqueada" sim/Não

    Bloqueada - Campo Sim/não

    Atualizar - Campo Sim/Não

    idfuncao - numero
    tx2 - numero
    idfusuario - numero

    tx1 - numero

    If Me.Bloqueada = False Then
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= true WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    Else
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= false WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    End If


    Obrigado


    .................................................................................
    *** Só sei que nada sei ***
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Alvaro Teixeira 6/12/2017, 16:05

    Olá Assis, aparentemente está bem.

    Será isto:
    If Me.Bloqueada = False Then
      CurrentDb.Execute "UPDATE tblPermissõesUsuários SET Bloqueada = true WHERE idfuncao = " & tx1 & " and idusuario =" & tx2 & ";"
    Else
      CurrentDb.Execute "UPDATE tblPermissõesUsuários SET Bloqueada = false WHERE idfuncao = " & tx1 & " and idusuario =" & tx2 & ";"
    End If


    Abraço
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3217
    Registrado : 13/12/2016

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Alexandre Fim 6/12/2017, 16:08

    Assis boa tarde,

    Voce pode usar na sua instrução:
    bloqueada = -1 'True
    ou
    bloqueada = 0 'False


    Abraço

    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Silvio 6/12/2017, 16:25

    Boa tarde a todos...

    Não querendo me intrometer....mas pelo que eu vi...essa função não está a fazer a mesma coisa sendo bloqueada ou não ??

    If Me.Bloqueada = False Then
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= true WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    Else
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= false WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    End If

    As condições estão idênticas, será que eu estou errado ?


    .................................................................................
    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."
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Alvaro Teixeira 6/12/2017, 16:47

    Olá a todos
    Silvio, veja:
    If Me.Bloqueada = False Then
       CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= true WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    Else
       CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= false WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    End If


    A nível de código está bem estruturado, poderá ter a questão do tx1 e tx2 ser string ou número, ou seja ter ou não aspa simples.
    Quem vai desvendar a questão é o amigo Assis.
    Cá aguardamos serenamente.

    Abraço
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Silvio 6/12/2017, 17:05

    Alvaro, boa tarde.

    De fato está sim bem estruturada. Mas tanto falso como verdadeiro ( a meu ver ) farão a mesma coisa.

    If Me.Bloqueada = False Then
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= true WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    Else ( if me.bloqueada = true then / senão )
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= false WHERE idfuncao =" & tx1 & " and idusuario =" & tx2 & ";"
    End If


    .................................................................................
    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."
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Alvaro Teixeira 6/12/2017, 17:37

    Olá Amigo Silvio,
    Salvo estar a fazer uma leitura errada o que está a fazer é:

    Se Bloqueada é igual a falso então
    ..consulta atualiza campo atualizar para verdadeiro
    Caso não seja da primeira condição (else) então
    ..consulta atualiza campo atualizar para falso
    Fim do SE (end if)

    Então, concluo que verifica o bloqueado e conforme é verdadeiro ou falso, vai alterar o campo atualizar.

    Agora, compreender a dificuldade do coelga Assis, apenas com o código sem saber a sua aplicabilidade é que é difícil de adivinhar.

    Assis, então? Aguardamos mais detalhes o que está a fazer e o que deveria acontecer.
    Falta, um requery ou refresh?
    Estamos cá "para dar o peito às balas"
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Assis 6/12/2017, 18:05

    Boa tarde Amigos

    Vamos ver se dá para perceber melhor .....

    Obrigado



    [Resolvido]Ao alterar um campo sim/Não Forum10


    .................................................................................
    *** Só sei que nada sei ***
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Silvio 6/12/2017, 18:29

    Algo parecido com isso talvez...


    If Me.Bloqueada = 0 Then
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= -1 WHERE idfuncao =" & Clng(tx1) & " and idusuario =" & CLng(tx2) & ";"
    Else
    CurrentDb.Execute "UPDATE tblPermissõesUsuários SET atualizar= 0 WHERE idfuncao =" & CLng(tx1) & " and idusuario =" & CLng (tx2) & ";"
    End If


    .................................................................................
    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."
    Assis
    Assis
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4772
    Registrado : 06/11/2009

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Assis 6/12/2017, 19:09

    Peço desculpa Sílvio

    Mas a vontade de resolver é tanta que vi mal .....o resultado.



    .................................................................................
    *** Só sei que nada sei ***
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Silvio 6/12/2017, 19:21

    Boa Noite
    Que bom que ficou resolvido.
    Abraços.


    .................................................................................
    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."
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Alvaro Teixeira 6/12/2017, 20:32

    cheers

    Conteúdo patrocinado


    [Resolvido]Ao alterar um campo sim/Não Empty Re: [Resolvido]Ao alterar um campo sim/Não

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 26/4/2024, 12:35