MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    [Resolvido] For Next com SQL

    Compartilhe

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 532
    Registrado : 09/11/2012

    [Resolvido] For Next com SQL

    Mensagem  =>Nois em Sex 29 Maio 2015, 14:48

    Bom dia!

    estou precisando corrigir o codigo abaixo, mas não estou conseguindo

    preciso marcar uma(s) caixa(s) sim/não fazendo uma pesquisa em uma tabela

    onde Y é o valor procurado
    e Z é a marcação na caixa sim/não

    além disso preciso que marque também se houver mais registros com o mesmo codigo.

    ou seja se tiver 3 codigos (54) que marque o sim em todas elas.


    Dim Y As Double
    Dim Z As Variant
    Y = Me.CodigoPai
    Z = -1

       CurrentDb.Execute "UPDATE tbl_EmbRetornavel SET Baixar='" & Z & "' WHERE codigo='" & Y & "'"



    obrigado! affraid


    Última edição por noisnafita em Sex 29 Maio 2015, 16:40, editado 1 vez(es)


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

    Alexandre Neves
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

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

    Re: [Resolvido] For Next com SQL

    Mensagem  Alexandre Neves em Sex 29 Maio 2015, 16:30

    Boa tarde,
    CurrentDb.Execute "UPDATE tbl_EmbRetornavel SET Baixar=" & Z & " WHERE codigo=" & Y


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

    =>Nois
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 532
    Registrado : 09/11/2012

    [Resolvido] For Next com SQL

    Mensagem  =>Nois em Sex 29 Maio 2015, 16:39

    Bacana cara não precisou nem do next.
    Funcionou perfeito, obrigado!


    .................................................................................
    [Você precisa estar registrado e conectado para ver esta imagem.] Att. Nois

    Se tudo não der certo reflita nessa frase: "Huguinho", "Zezinho" & "Luizinho"

      Data/hora atual: Qui 08 Dez 2016, 00:05