Jump to content
konsalik

Update da BD

Recommended Posts

konsalik

Boas,

Tenho algumas noções de vb mas não são muitas.

Não estou a conseguir fazer update da minha bd (access 2007) no visual basic 2008.

Alguém me pode dizer onde estou a errar?

        Dim myConn As Data.OleDb.OleDbConnection = New Data.OleDb.OleDbConnection("Provider= Microsoft.ACE.OLEDB.12.0 ;Data Source=C:\Users\...\Documents\music.accdb")
        Dim MySQL As String = "UPDATE music" + "values(""@Nº"", ""@Autor"", ""@musica"", ""@http"")"
        Dim Cmd As New Data.OleDb.OleDbCommand(MySQL, myConn)
        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@Nº", TextBox1.Text))
        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@Autor", TextBox2.Text))
        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@musica", TextBox3.Text))
        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@http", TextBox4.Text))
        myConn.Open()
        Cmd.ExecuteNonQuery()

Tipo de Dados:

Nº -> Autonumber

Autor ->text

musica ->text

http ->text

Obrigado pela atenção

Share this post


Link to post
Share on other sites
Andrepereira9

boas

Não seria antes assim?

Dim MySQL As  String = "UPDATE music SET [Nº] = @Nº, [Autor] = @Autor, [Musica] = @musica, [http] = @http WHERE [iD_Musica] = @ID_Musica"

Onde ID_Musica, é o campo que identifica qual a linha de dados devem de ser actualizados

Consulta este Site que tens como Inserir, Actualizar e Eliminar dados de BD. É para SQL, mas a sintaxe de Inserir, Actualizar e Eliminar dados, do Acess, é toda igual


A informática chegou para resolver problemas que antes não existiam

Quem ri por último é porque está conectado a 52 Kbs.

Share this post


Link to post
Share on other sites
konsalik

boas

Não seria antes assim?

Dim MySQL As  String = "UPDATE music SET [Nº] = @Nº, [Autor] = @Autor, [Musica] = @musica, [http] = @http WHERE [iD_Musica] = @ID_Musica"

Onde ID_Musica, é o campo que identifica qual a linha de dados devem de ser actualizados

É assim que dizes?

Dim MySQL As String = "UPDATE music SET [textbox1.text] = @Nº, [textbox2.text] = @Autor, [textbox3.text] = @musica, [textbox4.text] = @http WHERE [iD_Musica] = @ID_Musica"

JPaulinho eu pretendo actualizar, mas como sou novo em bd não percebo muito.

Share this post


Link to post
Share on other sites
jpaulino

Então deve ser algo como

        Dim MySQL As String = "UPDATE music SET Autor=?, musica=?, http=? WHERE [Nº]=?"

        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@Autor", TextBox2.Text))

        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@musica", TextBox3.Text))

        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@http", TextBox4.Text))

        Cmd.Parameters.Add(New Data.OleDb.OleDbParameter("@Nº", TextBox1.Text))

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

×
×
  • Create New...

Important Information

By using this site you accept our Terms of Use and Privacy Policy. We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.