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]Ajuda SQL muito simples

    Compartilhe
    avatar
    percoski
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 258
    Registrado : 27/02/2013

    [Resolvido]Ajuda SQL muito simples

    Mensagem  percoski em Qui 09 Out 2014, 12:50 am

    Gente se alguem puder dar uma olhada e coisa simples to errando em algum lugar.
     


       qtdP = "SELECT IdProduto, QtdProduto From TblProdutos where TblProdutos.IdProduto =   & Me.TxtCodProd"
        Set QtSql = CurrentDb.OpenRecordset(qtdP)
        TotQtdSql = QtSql(QtdProduto)

    o campo TxtCodProd é numerico.
    avatar
    Avelino Sampaio
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3380
    Registrado : 04/04/2010

    Re: [Resolvido]Ajuda SQL muito simples

    Mensagem  Avelino Sampaio em Qui 09 Out 2014, 9:19 am

    Olá!

    qtdP = "SELECT IdProduto, QtdProduto From TblProdutos where IdProduto = " & Me.TxtCodProd & ";"

    Altere a visualização do código, que fica mais fácil de identificar o erro, com esta minha dica 45.

    [Você precisa estar registrado e conectado para ver este link.]

    Sucesso!
    avatar
    percoski
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 258
    Registrado : 27/02/2013

    Re: [Resolvido]Ajuda SQL muito simples

    Mensagem  percoski em Qui 09 Out 2014, 8:51 pm

    Obrigado Avelino valeu mesmo....

      Data/hora atual: Seg 24 Abr 2017, 11:07 am