Visual Basic.NET - Modificar un campo de la linea de acces

 
Vista:
Imágen de perfil de Edgar
Val: 127
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Modificar un campo de la linea de acces

Publicado por Edgar (55 intervenciones) el 09/06/2019 03:32:25
Hola, yo escribo en un Textbox1 el Code (ya previamente guardado en acces) y en el Texbox2 escribo el número "Quantity" que quiero módificar en la línea del "Code" en el Acces

My base de datos luce así:

Access

My Diseño luce así:

diseno1

My error es

error2

My código es
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim provider As String
        Dim dataFile As String
        Dim connString As String
        Dim myConnection As OleDbConnection = New OleDbConnection
 
        provider = "Provier=Microsoft.ACE.OLEDB.16.0;Data Source="
        dataFile = "C:\Inventory.accdb"
        connString = provider & dataFile
        myConnection.ConnectionString = connString
 
        myConnection.Open()
 
        Dim str As String
        str = "Update [Product] set [Quantity] = '" & TextBox5.Text & "' Where [Code] = " & TextBox1.Text & " "
 
        Dim cwd As OleDbCommand = New OleDbCommand(str, myConnection)
 
        Try
 
            cwd.ExecuteNonQuery()
            cwd.Dispose()
            myConnection.Close()
 
 
        Catch ex As Exception
            MsgBox("no")
        End Try
 
    End Sub
End Class
My objetivo es crear una especie de contador en la casilla correspondiente a dada código
Alguien puede ayudarme?
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Edgar
Val: 127
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Modificar un campo de la linea de acces

Publicado por Edgar (55 intervenciones) el 09/06/2019 04:05:51
Ya encontré un error no es:
provider = "Provier=Microsoft.ACE.OLEDB.16.0;Data Source="
es:
provider = "Provider=Microsoft.ACE.OLEDB.16.0;Data Source="
Tambien cambié la ruta de la base de datos por:
dataFile = "C:\Users\eddy\Documents\Visual Studio 2015\Projects\WindowsApplication4\WindowsApplication4\bin\Debug\Inventory.accdb"

Y ahora me sale el mensaje de error cuando intento agregar 34 al campo "Quantity":

new-error

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim provider As String
        Dim dataFile As String
        Dim connString As String
        Dim myConnection As OleDbConnection = New OleDbConnection
 
        provider = "Provider=Microsoft.ACE.OLEDB.16.0;Data Source="
        dataFile = "C:\Users\eddy\Documents\Visual Studio 2015\Projects\WindowsApplication4\WindowsApplication4\bin\Debug\Inventory.accdb"
        connString = provider & dataFile
        myConnection.ConnectionString = connString
 
        myConnection.Open()
 
        Dim str As String
        str = "Update [Product] set [Quantity] = '" & TextBox5.Text & "' Where [Code] = " & TextBox1.Text & " "
 
        Dim cwd As OleDbCommand = New OleDbCommand(str, myConnection)
 
        Try
 
            cwd.ExecuteNonQuery()
            cwd.Dispose()
            myConnection.Close()
 
 
        Catch ex As Exception
            MsgBox("no se pudo editar")
        End Try
 
    End Sub

Alguien puede ayudarme, no me sale
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Edgar
Val: 127
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Modificar un campo de la linea de acces

Publicado por Edgar (55 intervenciones) el 09/06/2019 04:33:08
Eliminé las comillas simples del Textbox5.text y ahora el error es:


ex
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Phil Rob
Val: 2.767
Oro
Ha mantenido su posición en Visual Basic.NET (en relación al último mes)
Gráfica de Visual Basic.NET

Modificar un campo de la linea de acces

Publicado por Phil Rob (728 intervenciones) el 09/06/2019 21:32:50
Hola Edgar,

¿Como es?

Para tu problema, quizá corrigir la frasea de codigo :
str = "Update [Product] set [Quantity] = '" & TextBox5.Text & "' Where [Code] = " & TextBox1.Text & " "

Si [Quantity] es un Integer o otro numérico, creo que tiene que escribir
str = "Update [Product] set [Quantity] = " & TextBox5.Text & " Where [Code] = " & TextBox1.Text

Tambien, no es necesario & " " a finales del codigo.

Saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar