BOTAO ALTERAR NO VB 2010 E ACCESS

TCHESCO 18/03/2013 14:12:31
#420661
Olá, gostaria de saber como colocar um botão alterar no meu projeto
tenho um botão salvar e ele salva normal
mas se eu editar as info e clicar de novo em salvar da erro
como faço para criar um botão para altera
trata se de uma conexão vb e acess
Agradeço desde já!
o erro que da é este aí da foto
http://dc660.4shared.com/img/S_nboWnq/s7/0.19730004425030967/Errovbaccess.jpg?async
JAN031 14/04/2013 11:50:40
#421922
Olha esse exemplo

[txt-color=#0000f0]Private Sub btnUpdate_Click(ByVal sender As System.Object,
ByVal e As System.EventArgs) Handles btnUpdate.Click[/txt-color]

[txt-color=#0000f0] If[/txt-color] txtAu_ID.Text <> [Ô][Ô] And txtAuthor.Text <> [Ô][Ô] [txt-color=#0000f0]Then
[/txt-color]
cmdUpdate.CommandText = [Ô]UPDATE Authors SET Author = [ô][Ô] & txtAuthor.Text & [Ô][ô]
WHERE Au_ID = [Ô] & txtAu_ID.Text & [Ô];[Ô]

[ô]MsgBox(cmdUpdate.CommandText)

cmdUpdate.CommandType = CommandType.Text

cmdUpdate.Connection = cnnOLEDB

cmdUpdate.ExecuteNonQuery()

MsgBox(txtAu_ID.Text = [Ô]Record updated.[Ô])[Ô][Ô]

txtAuthor.Text = [Ô][Ô]

[txt-color=#0000f0] Else
[/txt-color]
MsgBox([Ô]Enter the required values:[Ô] & vbNewLine & [Ô]1. Au_ID[Ô] & vbNewLine &
[Ô]2.Author[Ô])

[txt-color=#0000f0] End If[/txt-color]
Faça seu login para responder
Voltar