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]Problemas com Dcount

    avatar
    Eneas
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 04/01/2012

    [Resolvido]Problemas com Dcount Empty Problemas com Dcount

    Mensagem  Eneas 2/6/2012, 11:54

    Caro amigos, estou com o seguinte problema
    Tenho a TabPonto onde quero verificar se os campos Codprom03, Data03, e HoraEntA03 estão preenchidos.
    A verificação seria o seguinte, se o campo CodProm03 for igual a TxCodPromEntA e Data03 for igual a TxData03A e HoraEntA03 estiver preenchida, vá para VerPar1 caso o contrário vá para OkBat1;
    No meu caso, todos os campos estão preenchidos, mas, sempre está indo para OkBat1, creio que de alguma forma não está contando os registros, pois se estivesse o valor seria maior ou = a 1 fazendo com que fosse para o VerPar1;
    Segue o código

    Código:
    If Nz(DCount("*", "Tabponto", "[Codprom03]=" & Me.txcodpromenta & " And [Data03]=#" & Me.txdata03A & "#" & "And [horaentA03]<>0"), 0) >= 1 Then
    GoTo VerPar1
    Else
    GoTo okbat1

    Gostaria de saber onde é o meu erro.

    Agradeço a todos;
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Problemas com Dcount Empty Re: [Resolvido]Problemas com Dcount

    Mensagem  Alexandre Neves 2/6/2012, 12:04

    Boa tarde, Eneas
    Tente
    If Nz(DCount("*", "Tabponto", "[Codprom03]=" & Me.txcodpromenta & " And [Data03]=#" & Me.txdata03A & "# And Not IsNull(horaentA03)"), 0) >= 1 Then
    GoTo VerPar1
    Else
    GoTo okbat1
    Se não der certo, veja a formatação da data: Format(Me.txdata03A,"mm-dd-yyyy")
    avatar
    Eneas
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 04/01/2012

    [Resolvido]Problemas com Dcount Empty Re: [Resolvido]Problemas com Dcount

    Mensagem  Eneas 2/6/2012, 15:38

    Nao deu certo com a sintaxe passada. Nao entendi a questao da data, onde eu colocaria esse parametro?
    No meu form, a data estah aparecendo como ddmmaaaa e no valor padrao estah Data() igual ao gravado na tabela.
    Obrigado pela resposta amigo.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Problemas com Dcount Empty Re: [Resolvido]Problemas com Dcount

    Mensagem  Alexandre Neves 2/6/2012, 16:35

    Eneas,
    A formatação da data é na expressão
    If Nz(DCount("*", "Tabponto", "[Codprom03]=" & Me.txcodpromenta & " And [Data03]=#" & Format(Me.txdata03A,"mm-dd-yyyy") & "# And Not IsNull(horaentA03)"), 0) >0 Then
    GoTo VerPar1
    Else
    GoTo okbat1
    avatar
    Eneas
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 123
    Registrado : 04/01/2012

    [Resolvido]Problemas com Dcount Empty Re: [Resolvido]Problemas com Dcount

    Mensagem  Eneas 2/6/2012, 18:20

    Caro Alexandre...Muito Obrigado, deu certinho aqui...

    Que Deus possa abencoar grandemente a sua vida.

    Conteúdo patrocinado


    [Resolvido]Problemas com Dcount Empty Re: [Resolvido]Problemas com Dcount

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 13:34