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]Consulta adição com parêmentro insuficiente.

    ConectadoMarcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº1

    [Resolvido]Consulta adição com parêmentro insuficiente. Empty Consulta adição com parêmentro insuficiente.

    Mensagem  Marcelo David 9/2/2012, 13:37

    Amigos, estou tentando execultar a consulta abaixo, mas está dando o erro 3061 e diz que os parâmentros são insuficientes, era esperado 1.

    Não consigo ver onde estou errando...
    Alguma sugestão?


    CurrentDb.Execute "INSERT INTO tbExclusivo ( ValorExclusivo ) SELECT [Formulários]![frmPedidos]![SfrmDetalhePedido].[Formulário]![IdProdutoId] AS Origem;"


    .................................................................................
    [Resolvido]Consulta adição com parêmentro insuficiente. Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Consulta adição com parêmentro insuficiente. Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Consulta adição com parêmentro insuficiente. Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Consulta adição com parêmentro insuficiente. Marcel11
    • Ir para o topo
    criquio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009
    • Mensagem nº2

    [Resolvido]Consulta adição com parêmentro insuficiente. Empty Re: [Resolvido]Consulta adição com parêmentro insuficiente.

    Mensagem  criquio 9/2/2012, 13:50

    Não entendi bem a origem, mas não resolveria algo assim?

    CurrentDb.Execute "INSERT INTO tbExclusivo(ValorExclusivo) VALUES('" & Forms!frmPedidos!SfrmDetalhePedido.Forms!IdProdutoId & "')"

    Outra coisa, está fazendo isso via vba, não? E, no caso, esse campo de origem está em outro local que não o próprio formulário aonde está a linha do código?


    .................................................................................
    Meu novo site: www.vcssistemas.com.br
    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.
    • Ir para o topo
    ConectadoMarcelo David
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3947
    Registrado : 21/04/2011
    • Mensagem nº3

    [Resolvido]Consulta adição com parêmentro insuficiente. Empty Re: [Resolvido]Consulta adição com parêmentro insuficiente.

    Mensagem  Marcelo David 9/2/2012, 14:09

    criquio, funcionou, apenas tive que fazer uma pequena alteração para sanar um erro que ocorreu(o objeto não aceita propriedade ou o método), retirando as referencias dos formulários e me referi diretamente ao campo que pego para adicionar.

    Acho que esse erro ocorreu porque a consulta é feita diretamente do subformulário, e não do formulário pai. Estou certo?

    Sobre a origem: era um campo virtual que eu tinha criado na consulta SQL do access (apenas copiei de lá e tranferi para o VBA...)

    O código ficou assim:

    CurrentDb.Execute "INSERT INTO tbExclusivo(ValorExclusivo) VALUES('" & Me.IdProdutoId & "')"

    Muito obrigado amigão!


    .................................................................................
    [Resolvido]Consulta adição com parêmentro insuficiente. Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Consulta adição com parêmentro insuficiente. Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Consulta adição com parêmentro insuficiente. Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Consulta adição com parêmentro insuficiente. Marcel11
    • Ir para o topo
    criquio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009
    • Mensagem nº4

    [Resolvido]Consulta adição com parêmentro insuficiente. Empty Re: [Resolvido]Consulta adição com parêmentro insuficiente.

    Mensagem  criquio 9/2/2012, 14:21

    Ótimo. Foi exatamente isso que eu quis saber quando perguntei se o campo estava em outro formulário, pois, sendo no próprio, bastaria passa o nome do campos conforme fizestes.
    Sucesso.


    .................................................................................
    Meu novo site: www.vcssistemas.com.br
    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº5

    [Resolvido]Consulta adição com parêmentro insuficiente. Empty Re: [Resolvido]Consulta adição com parêmentro insuficiente.

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 22/11/2024, 12:54