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

    RecordSet com critérios

    Compartilhe

    cakanilo
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 42
    Registrado : 09/04/2011

    RecordSet com critérios

    Mensagem  cakanilo em Qua 16 Jul 2014, 20:39

    Boa tarde,

    necessito realizar um RecordSet com critérios da seguinte forma.

    dim var16 as integer
    dim var4 as string
    dim var5 as string

    Set RsFolha = CurrentDb.OpenRecordset("TBFrequencia")
       
       'Laço para ir de registro em registro, listando todos os estagiários da tabela.
       While Not RsFolha.EOF
               
               var16 = RsFolha.Fields("AnoFrequencia") = me.Ano and me.entregue = sim -> Aqui entrag o lugar onde estou tentando colocar o meu critério.
               var4 = RsFolha.Fields("Freq_Jan") = -1
               var5 = RsFolha.Fields("Freq_Fev") = -1
    avatar
    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: RecordSet com critérios

    Mensagem  Alexandre Neves em Qui 17 Jul 2014, 15:22

    Boa tarde,
    Explique melhor. Não entendi se pretende consultar a tabela ou alterar os registos


    .................................................................................
    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

      Data/hora atual: Ter 27 Jun 2017, 21:41