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]Ajuda com tabelas

    avatar
    NGCosta
    Novato
    Novato

    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 em Qui 28 Fev 2019, 8:17 am

    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 100%

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

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

    Mensagem  thiagonsilvaa em Qui 28 Fev 2019, 12:23 pm

    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 100%

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

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

    Mensagem  NGCosta em Qui 28 Fev 2019, 1:56 pm

    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 3 vez(es)
    avatar
    thiagonsilvaa
    Avançado
    Avançado

    Respeito às Regras 100%

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

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

    Mensagem  thiagonsilvaa em Qui 28 Fev 2019, 3:39 pm

    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 5 vez(es)
    avatar
    NGCosta
    Novato
    Novato

    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 em Sex 01 Mar 2019, 7:34 am

    Thiago,

    Funcionou perfeitamente!!!

    Muitíssimo obrigado pela ajuda.

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

    Respeito às Regras 100%

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

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

    Mensagem  thiagonsilvaa em Sex 01 Mar 2019, 7:53 am

    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 100%

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

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

    Mensagem  NGCosta em Sex 01 Mar 2019, 11:22 am

    Thiago, mas uma vez obrigado.

    Conteúdo patrocinado

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

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Ter 21 Maio 2019, 9:11 am