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]Consulta com 2 condições no WHERE

    eriberto
    eriberto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 04/07/2013

    [Resolvido]Consulta com 2 condições no WHERE Empty [Resolvido]Consulta com 2 condições no WHERE

    Mensagem  eriberto 9/7/2015, 14:10

    Bom dia a todos!!! estou a usar um consulta no vba com 2 condições no WHERE mas esta me retornando o seguinte erro:
    "Erro de compilação: Era esperado: Um separador de lista ou )" abaixo segue o código para melhor analise.

    Código:
    Dim db As DAO.Database
    Dim rs As DAO.Recordset
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM dbo_tblDetalheVenda WHERE codVenda =" & Me.txtCodPrevenda AND codProduto =" & Me.txtCodProduto, dbOpenDynaset, dbSeeChanges)
       If Not rs.BOF Then
                Me.txtCodProdutoExiste = rs("codProduto")
        End If
            rs.Close
            Set rs = Nothing

    Observação: o trecho criticado pelo erro é:
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM dbo_tblDetalheVenda WHERE codVenda =" & Me.txtCodPrevenda AND codProduto =" & Me.txtCodProduto, dbOpenDynaset, dbSeeChanges)

    Desde já muito grato pela atenção de todos.
    Alexandre Neves
    Alexandre Neves
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Consulta com 2 condições no WHERE Empty Re: [Resolvido]Consulta com 2 condições no WHERE

    Mensagem  Alexandre Neves 9/7/2015, 14:43

    Boa tarde
    Set rs = CurrentDb.OpenRecordset("SELECT * FROM dbo_tblDetalheVenda WHERE codVenda =" & Me.txtCodPrevenda & " AND codProduto =" & Me.txtCodProduto, dbOpenDynaset, dbSeeChanges)


    .................................................................................
    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
    good guy
    good guy
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1304
    Registrado : 05/02/2010

    [Resolvido]Consulta com 2 condições no WHERE Empty Consulta com 2 condições no WHERE

    Mensagem  good guy 9/7/2015, 14:44

    Olá Eriberto,

    Corrija o emprego de suas aspas duplas e troque o nome das caixas de texto por variáveis na sintaxe:

    Dim nCodVenda As Integer (ou Long)
    Dim nCodProduto As Integer (ou Long)

    nCodVenda = Me.txtCodPrevenda
    nCodProduto = Me.txtCodProduto


    ERRADO:
    CurrentDb.OpenRecordset("SELECT * FROM dbo_tblDetalheVenda WHERE codVenda =" & Me.txtCodPrevenda AND codProduto =" & Me.txtCodProduto

    CERTO:
    CurrentDb.OpenRecordset("SELECT * FROM dbo_tblDetalheVenda WHERE codVenda =" & nCodVenda & " AND codProduto =" & nCodProduto
    eriberto
    eriberto
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 72
    Registrado : 04/07/2013

    [Resolvido]Consulta com 2 condições no WHERE Empty Re: [Resolvido]Consulta com 2 condições no WHERE

    Mensagem  eriberto 9/7/2015, 18:34

    Muito grato pela ajuda dos grandes metres Alexandre e good gui... funcionou perfeitamente os dois exemplo..... sucesso a vocês.

    Conteúdo patrocinado


    [Resolvido]Consulta com 2 condições no WHERE Empty Re: [Resolvido]Consulta com 2 condições no WHERE

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/4/2024, 23:27