Pessoal, está acontecendo alguma coisa estranha e sinceramente não sei o que é.
Vejam só estou tentando atualizar um produto no meu sistema, só que não atualiza.
O código que estou usando é esse:
Dim AlterarProduto As String
AlterarProduto = MsgBox("Alterar produto agora?", vbQuestion + vbYesNo, "Alterar Produto")
If AlterarCliente = 6 Then ' ou variável = vbyes
sql = "Update Produtos set tipoproduto = '" & cmbProdutos.Text & "', nomeproduto = '" & txtProduto.Text & "' where Identif = " & txtIdentif.Text & ""
DB.Execute (sql)
End If
txtProduto.SetFocus
O engraçado é que estou usando a mesma sintaxe para todas as outras astualizações e atualiza normalmente se eu fizer alguma alteração.
Agora se eu fizer na tela de produtos ele não dá nenhum erro de sintaxe, porém não atualiza.
Eu estou achando que ele não está executando, porque fiz um texte para infomar a mensagem na tela e não executa.
O que poderia ser? Alguém pode me ajudar?
Obrigado