[Resolvido]Consultas Atualização

Eu tenho um sistema de vendas que ao realizar a venda ele chama algumas consultas de atualização antes de anexar o produto na venda... Acontece que o sistema emite diversos alertas dizendo "você esta prestes a realizar uma consulta atualização que modificará os dados da tabela"
PERGUNTO: O que fazer para que essas mensagens não sejam mostradas?

Se puderem me ajudar, fico grato...
Harysohn

Coloque antes da chamada:

DoCmd.SetWarnings False

e depois da consulta

DoCmd.SetWarnings True

Isso é para o caso de estar chamando a consulta por vba. Se for por macro, dê uma olhada nas ações da macro que você pode fazer a mesma coisa na macro, configurado Aviso com Não antes da linha da consulta e Sim depois dela.

Também pode fazer isso no evento ao carregar do formulário principal e fica disponível para toda a aplicação

Application.SetOption "Confirm Action Queries", False
Application.SetOption "Confirm Record changes", False
Application.SetOption "Confirm Document deletions", False

No form onde faz referencia as tabelas de atualização inseri os comando sugeridos pelo criquio, que ficaram assim:

If Estoque < Me.txtQtde.Value Then GoTo EstIns
DoCmd.SetWarnings False
DoCmd.OpenQuery "cnsATUEST"
DoCmd.OpenQuery "cnsINPRVE"
DoCmd.SetWarnings True
Me.LimpaProduto



Obrigado pela pronta Ajuda... Fico imensamente grato..