none
Me tira el error de no coinciden los datos con la exprecion del criterio RRS feed

  • Pregunta

  • esta es mi programacion  

    no actualiza los datos buscados en la base de datos de vb.net a access2013

    -----------------------------------------------------------------------------------------------------------------------------------------

    Private Sub btnactualizar_Click(sender As System.Object, e As System.EventArgs) Handles btnactualizar.Click
            If (Me.txtcodigo.Text = "") Then
                MsgBox("el campo no puede estar vacío", MsgBoxStyle.Critical, "atencion")
                Me.txtcodigo.Focus()
            Else
                Dim codigo As String = ""
                Dim marca As String = ""
                Dim precio As Decimal
                Dim tipo As String = ""
                Dim existencias As Integer
                codigo = txtcodigo.Text
                marca = txtmarca.Text
                precio = txtprecio.Text
                tipo = txttipo.Text
                existencias = txtexist.Text
                cmd.CommandType = CommandType.Text
                cmd.Connection = conn
                sql = "UPDATE PRODUCTOS SET "
                sql += "MARCA = '" & marca & "',"
                sql += "PRECIO = '" & precio & "',"
                sql += "TIPO = '" & tipo & "',"
                sql += "EXISTENCIAS = '" & existencias & "'"
                sql += "WHERE CODIGO =" & codigo & " "
                cmd.CommandText = sql
                Try
                    cmd.ExecuteNonQuery()
                    MsgBox("datos actualizados")
                Catch ex As Exception
                    MsgBox(ex.Message)
                End Try
            End If

        End Sub


    pablopisquiy

    miércoles, 23 de octubre de 2019 2:49

Respuestas

  • gracias pude darme cuenta que en 

    sql += "WHERE CODIGO =" & codigo& " "

    era

    sql += "WHERE Cstr(CODIGO) =" & codigo & " "


    pablopisquiy

    • Propuesto como respuesta Pablo Rubio miércoles, 23 de octubre de 2019 16:58
    • Marcado como respuesta Pablo Pisquiy domingo, 29 de diciembre de 2019 6:58
    miércoles, 23 de octubre de 2019 4:09

Todas las respuestas

  • Hola Pablo, a primera vista faltaría apostrofe en "' codigo'" y algunas separaciones, pero habría que analizar más para ver si es por eso o porque falta algún campo que declarar. Así queda la sentencia en string tal cual la tienes declarada

    UPDATE PRODUCTOS SET MARCA = 'Datos',PRECIO = 'Datos',TIPO = 'Datos',EXISTENCIAS = 'Datos'WHERE CODIGO =Datos

    (Datos reemplaza el valor de los TextBox)

    Saludos


    ARA San Juan 44 HEROES     ‗‗‗‗­|||||‗‗‗‗‗

    • Propuesto como respuesta Pablo Rubio miércoles, 23 de octubre de 2019 16:57
    miércoles, 23 de octubre de 2019 3:31
  • gracias pude darme cuenta que en 

    sql += "WHERE CODIGO =" & codigo& " "

    era

    sql += "WHERE Cstr(CODIGO) =" & codigo & " "


    pablopisquiy

    • Propuesto como respuesta Pablo Rubio miércoles, 23 de octubre de 2019 16:58
    • Marcado como respuesta Pablo Pisquiy domingo, 29 de diciembre de 2019 6:58
    miércoles, 23 de octubre de 2019 4:09