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

2 participantes

    [Resolvido]Contagem de Cargas de acordo com a data informada

    avatar
    Ismael Silva
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 813
    Registrado : 11/12/2017

    [Resolvido]Contagem de Cargas de acordo com a data informada Empty [Resolvido]Contagem de Cargas de acordo com a data informada

    Mensagem  Ismael Silva 13/1/2023, 00:37

    Boa noite,

    Estou tentando utilizar a sintaxe abaixo para ver se tenho o registro na tabela baseado na data informada, no entanto as vezes funciona e hora não, e não estou achando onde está o erro.

    Ex: O controle é para lançar cargas, aí quando eu coloco a data que eu quero, o sistema faz a verificação na tabela se tem algum registro de acordo com a data informada, se não encontrar, então o ID será = 1, mas se encontrar, quero que some +1 e assim por diante.


    If DCount("[Id]", "Tbl_Ordem_Carregamento", "Data_Carga =#" & Format(Txt_Data, "mm/dd/yyyy") & "#") = 0 Then

    Me.Txt_Id = 1



    Else
    Txt_Id = DMax("[Id]", "Tbl_Ordem_Carregamento") + 1
    End If


    End If
    avatar
    Ismael Silva
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 813
    Registrado : 11/12/2017

    [Resolvido]Contagem de Cargas de acordo com a data informada Empty Re: [Resolvido]Contagem de Cargas de acordo com a data informada

    Mensagem  Ismael Silva 14/1/2023, 00:19

    Alguma sugestão?
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Contagem de Cargas de acordo com a data informada Empty Re: [Resolvido]Contagem de Cargas de acordo com a data informada

    Mensagem  Alexandre Neves 14/1/2023, 18:24

    Boa noite
    Será da formatação da data?
    If DCount("[Id]", "Tbl_Ordem_Carregamento", "Data_Carga =#" & Format(Txt_Data, "dd/mm/yyyy") & "#") = 0 Then


    .................................................................................
    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
    Ismael Silva
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 813
    Registrado : 11/12/2017

    [Resolvido]Contagem de Cargas de acordo com a data informada Empty Re: [Resolvido]Contagem de Cargas de acordo com a data informada

    Mensagem  Ismael Silva 15/1/2023, 12:34

    Acho que era isso mesmo;

    Obrigado pela a ajuda.

      Data/hora atual: 7/2/2023, 22:10