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

    [Resolvido]Ajuda com tabelas

    avatar
    NGCosta
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 18/06/2018

    [Resolvido]Ajuda com tabelas Empty [Resolvido]Ajuda com tabelas

    Mensagem  NGCosta 28/2/2019, 13:17

    Boa dia,

    Preciso de uma ajuda.

    Tenho uma tabela chamada TbLocal onde tenho os seguintes campos:

    CodLocal – Numeração Automática
    Local – Texto Curto
    Reservado – Sim/Não
    Obs.: o campo Local já está preenchido com: local01, local02... até local100

    Em uma outra tabela chamada TbCadCliente, tenho os seguintes campos:

    CodCad – Numeração Automática
    Nome – Texto Curto
    LocalCad – Texto Curto

    No formulário de entrada dos dados na TbCadCliente, tenho uma combobox chamada CboxLocal onde faço uma pesquisa (local01, local02... até local100) na TbLocal.
    Meu problema é que ao cadastrar um cliente, não estou conseguindo marcar o campo Reservado da TBLocal como SIM, referente ao local escolhido.

    Desde de já agradeço.
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  thiagonsilvaa 28/2/2019, 17:23

    No botão de salvar ou algum outro local que achar conveniente:

    Currentdb.execute ("UPDATE tblocal SET Reservado =-1 WHERE local='" & cboxlocal & "'")

    Adapte a sua necessidade, a ideia é basicamente essa
    avatar
    NGCosta
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 18/06/2018

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  NGCosta 28/2/2019, 18:56

    Thiago,

    Obrigado pelo retorno, porém não funcionou. Estou anexando o arquivo (Access 2013) pois assim fica melhor para você verificar.

    Muito obrigado pela atenção.
    Anexos
    [Resolvido]Ajuda com tabelas AttachmentCadastroTeste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (55 Kb) Baixado 4 vez(es)
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  thiagonsilvaa 28/2/2019, 20:39

    Boa tarde !

    Por favor, verifique agora.

    No código anterior eu só coloquei um ".column(1)" que refere-se ao local na combox:

    Currentdb.execute ("UPDATE tblocal SET Reservado =-1 WHERE local='" & cboxlocal.column(1) & "'")


    Qualquer dúvida, volte a retornar.

    Abraços.
    Anexos
    [Resolvido]Ajuda com tabelas AttachmentCadastroTeste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (64 Kb) Baixado 7 vez(es)
    avatar
    NGCosta
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 18/06/2018

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  NGCosta 1/3/2019, 12:34

    Thiago,

    Funcionou perfeitamente!!!

    Muitíssimo obrigado pela ajuda.

    Grande abraço.
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 367
    Registrado : 12/01/2017

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  thiagonsilvaa 1/3/2019, 12:53

    O fórum agradece o retorno !

    Não esqueça de dar o tópico como resolvido.

    Até mais.

    Abraços.
    avatar
    NGCosta
    Novato
    Novato

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 18
    Registrado : 18/06/2018

    [Resolvido]Ajuda com tabelas Empty Re: [Resolvido]Ajuda com tabelas

    Mensagem  NGCosta 1/3/2019, 16:22

    Thiago, mas uma vez obrigado.

      Data/hora atual: 14/6/2021, 07:48