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


3 participantes

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    thiagonsilvaa
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017
    • Mensagem nº1

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  thiagonsilvaa 15/1/2019, 13:35

    Boa tarde a todos.

    Venho por meio deste tópico solicitar ajuda a uma questão.
    Estou tentando estruturar um quadro de reservas hoteleiro.

    Na minha tabela de reservas, tenho essa estrutura:
    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Reserv10

    Tenho a estrutura do quadro desta maneira:
    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Quadro10

    Gostaria de que quando eu lançasse uma reserva automaticamente já escrevesse "Reservado" naquele quarto e data específica.

    Como o exemplo abaixo:
    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Sem_tz11

    Se alguém puder dar uma ajuda de como inserir esse valor na coluna específica da acomodação em questão.

    Grato !!!
    Abraços.
    • Ir para o topo
    Dilson
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009
    • Mensagem nº2

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  Dilson 15/1/2019, 23:22

    Olá!

    Embora esteja caprichado a apresentação da sua dúvida, parabéns nota 10, ainda me resta dúvida em qual cenário quer aplicar, porque veja só:

    Olhando para a ilustração do meio, a ação de autocomplete seria mais lógico escrever o reservado no quarto desejado e autocompletar o campo data. Ao contrário como está propondo deveria ser apresentado outra lógica, outro cenário.

    Nos diga, melhore a lógica de como quer aplicar a programação.
    • Ir para o topo
    FabioGO
    avatar
    FabioGO
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 21/08/2012
    • Mensagem nº3

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  FabioGO 16/1/2019, 07:16

    A lógica esta meio estranha mesmo, mas mesmo assim tentei fazer algo bem simples para dar uma luz.

    Baseado nas informações, suponho que a tabela de quartos ja possui as datas para o ano todo, fazendo a atualização conforme registro de reserva pelo período.

    Veja se ajuda em algo
    Anexos
    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento AttachmentBanco de dados1.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (25 Kb) Baixado 15 vez(es)
    • Ir para o topo
    thiagonsilvaa
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017
    • Mensagem nº4

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  thiagonsilvaa 16/1/2019, 09:30

    Bom dia a todos !

    Primeiramente, gratidão pela resposta.

    Bom, vou tentar explicar de forma clara o que pretendo.

    Tenho um formulário onde alimento a primeira tabela a qual mostrei na primeira imagem.

    Assim que o hóspede confirmar a reserva gostaria de que atualizasse o status do quarto para "reservado" para aquela data a qual ele fez a reserva. (autocompletar ou alguma função que adicione as datas do ano todo, o que for mais viável)

    Seria basicamente a ideia do nosso amigo Fabio.
    • Ir para o topo
    Dilson
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009
    • Mensagem nº5

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  Dilson 16/1/2019, 14:43

    Ah sim agora clareou !

    Muito legal o código do Fabio, acho que vai te atender. Faça os teste e nos diga o resultado.

    Fabio, se puder,  exponha o código no tópico daí estará perfeito, pelo que ora ou outra perde-se esse anexo e jamais veremos a solução proposta por si. Se desejar fazer isso, basta editar sua postagem e expor lá. Abraço !
    • Ir para o topo
    thiagonsilvaa
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017
    • Mensagem nº6

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  thiagonsilvaa 17/1/2019, 08:59

    Bom dia a todos !

    Primeiramente, obrigado pela reposta.

    A ideia do nosso amigo Fabio funcionou perfeitamente, adaptei as minhas necessidades e ficou show !

    Meu muito obrigado !!!
    Abraços.


    Última edição por thiagonsilvaa em 17/1/2019, 09:30, editado 1 vez(es)
    • Ir para o topo
    Dilson
    Dilson
    Dilson
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1743
    Registrado : 11/11/2009
    • Mensagem nº7

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  Dilson 17/1/2019, 09:25

    Ótimo amigo.

    O ideal agora é você editar sua postagem e apertar o botão Resolvido porque aqui finalizou essa dúvida.

    Nova dúvida, novo tópico.

    Abraço!
    • Ir para o topo
    thiagonsilvaa
    avatar
    thiagonsilvaa
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 384
    Registrado : 12/01/2017
    • Mensagem nº8

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  thiagonsilvaa 17/1/2019, 09:31

    Tópico resolvido !

    Mais uma vez, gratidão a todos !
    • Ir para o topo
    FabioGO
    avatar
    FabioGO
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 124
    Registrado : 21/08/2012
    • Mensagem nº9

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  FabioGO 17/1/2019, 09:38

    Sobre o que você perguntou sobre gerar os dias do ano, esse código simples pode te ajudar.
    Mas faça adaptações conforme suas tabelas e objetos

    Em um botão de comando, no evento ao clicar

    Código:
    Dim i As Date, DtIn As Date, DtFim As Date

    If DCount("[CampoComAsDatas]", "SuaTabela", "Year([CampoComAsDatas])='" & Me.CaixaDeTextoDoFormularioComAnoDigitado & "'") > 0 Then
        MsgBox "Ja existem dias para esse ano..."
    Else
        DtIn = DateSerial(Me.CaixaDeTextoDoFormularioComAnoDigitado, 1, 1)
        DtFim = DateSerial(Me.CaixaDeTextoDoFormularioComAnoDigitado, 12, 31)
       
        For i = DtIn To DtFim
            CurrentDb.Execute "INSERT INTO SuaTabela (CampoComAsDatas) VALUES (#" & Format(i, "MM/DD/YYYY") & "#)"
        Next
    End If
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº10

    [Resolvido]Inserir valor na coluna específica de acordo com um lançamento Empty Re: [Resolvido]Inserir valor na coluna específica de acordo com um lançamento

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 7/11/2024, 14:41