Atualização de preços de produtos específicos
Adquira a assinatura vitalícia do site e passe a ter acesso aos arquivos exemplos, vídeos, revistas, livros e ao kit de montagem de ribbons. Você terá suporte por e-mail, caso necessite tirar dúvidas pontuais. Clique AQUI e veja como obter um dos nossos planos. Clique AQUI e faça uma visita a seção Downloads do site e verifique as centenas de arquivos que estará à sua disposição. Clique AQUI e faça uma visita a seção Vídeos do site e veja a lista que estará disponível ao se tornar o nosso assinante vitalício. Clique AQUI e saiba mais detalhes sobre o kit de montagem de ribbons (deixe seus aplicativos com aspecto profissional).
Usuário Francisco:
Olá, Avelino!
Gostaria de sua ajuda. Não sei como faço para atualizar o preço dos produtos, pois quero que seja da seguinte forma: - inserir à porcentagem de aumento na hora da atualização, com opção de selecionar um determinado produto ou selecionar todos para atualização.
Obrigado.
Suporte:
Francisco,
para este procedimento você pode utilizar a consulta de ação UPDATE do VBA.
Exemplo para o caso de você querer atualizar todos os produtos em mais 25%:
Currentdb.execute "UPDATE NomeDaTabela SET ValorProduto = ValorProduto * 1.25;"
Exemplo para o caso de você querer atualizar um único produto em mais 5%:
Currentdb.execute "UPDATE NomeDaTabela SET ValorProduto = ValorProduto * 1.05 WHERE IdProduto = 28;"
Caso você ainda não esteja treinado em usar o código VBA, pode montar uma consulta gráfica. Veja um exemplo de uma consulta atualização que aumenta os preços em 25% de todos os produtos:
Nota: faça um backup de segurança dos seus dados, antes de realizar o teste.
Usuário Francisco:
Boa noite, Avelino.
Entendi as suas explicações. Ficou tudo direitinho, do jeito que o senhor orientou.
|
3 comentário(s) Avelino Sampaio 26/09/2019 03:00:34 Silvio, ops! Aonde esta assim: ... '=" & me.endereco... Coloque assim: ...= '" & me.endereco... Sucesso! Avelino Sampaio 26/09/2019 02:55:28 Silvio, experimente assim: CurrentDb.Execute "UPDATE TB_Produto set endereco '=" & me.endereco & "' where codigo_produto =" & me.texto78.value & ";" Sucesso! silvio 25/09/2019 16:52:28 boa noite Avelino, estou com um projeto onde tenho uma tabela de produtos onde consta informações do produto e o endereço, preciso alterar o endereço de um produto na tabela atraves de um formulario, abaixo o codigo inseriddo no botão salvar do formulario. CurrentDb.Execute "UPDATE TB_Produto set endereco = me.endereco where codigo_produto = me.texto78.value;" o problema ao clicar no botão o sistema retorna o seguint erro: "erro de tempo de execusão 3061 Parametros insuficientes eram esperados 2. |
