| Mensagem : |
Bom dia a todos, estou aqui mais uma vez. Estou trabalhando com ws 2005 e base de dados access, vejam esse codigo e me falem porque q qd rodo a aplicação aparece mensagem de registro atualizado mas não atualiza a tabela. O q me intriga é q deveria aparecer mensagem de erro na exception do try catch. Já ocorreu isto com algum de vcs?
Abs Nascimento
Dim conecxao As OleDbConnection = New OleDbConnection(My.Settings.ConstrularConnectionString1)
try
conecxao.Open()
Dim sql As String = "UPDATE produtos SET quantidade = quantidade WHERE codigo= codigo "
Dim comando As New OleDbCommand
Dim da As OleDbDataAdapter = New OleDbDataAdapter
da.SelectCommand = comando
comando.Parameters.AddWithValue("@codigo", txtCodProduVendA.Text)
comando.Parameters.AddWithValue("@Quantidade", txtestoque.Text)
Dim PARAqUANTIDADE As New OleDbParameter
comando.ExecuteNonQuery()
conecxao.Close()
MsgBox("Registro atualizado.")
End If
Catch ex As Exception
MsgBox("Ocorreu um erro." & ex.Message)
Finally
End Try |
Atualizando dados por nascito2008 em 31/5/2012 07:14:00
