1

Necesito verificar si existe el registro en el campo "Producto" para hacer un update en el.

 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
    Dim Conexion As New MySqlConnection("data source=localhost; user=root; password=; database=importaciones;")
    Dim Comando As MySqlCommand
    Dim ConsultaSQL As String
    Dim Reader As MySqlDataReader
    If TextBox1.Text = "" Or TextBox2.Text = "" Or TextBox3.Text = "" Then
        MsgBox("Por favor complete todos los datos")
    Else
        Try
            Conexion.Open()
            ConsultaSQL = "UPDATE productos SET Costo='" & TextBox2.Text & "' , Precio='" & TextBox3.Text & "'  WHERE Producto='" & TextBox1.Text & "' "
            Comando = New MySqlCommand(ConsultaSQL, Conexion)
            Reader = Comando.ExecuteReader()
            Conexion.Close()
        Catch Exep As Exception
            MsgBox(Exep.Message)
        End Try

        MsgBox("Registro actualizazdo correctamente")
        TextBox1.Text = ""
            TextBox2.Text = ""
            TextBox3.Text = ""
        End If
        Form2.actualizar()
End Sub
1
  • Ejecuta primero un MySqlCommand con el método ExecuteScalar y el query Select count(*) WHERE Producto='" & TextBox1.Text & "' " . Por cierto, nunca debes construir tus querys concatenando los strings. El código que tienes es totalmente inseguro y expuesto a SqlInjection. Si yo tuviera acceso a tu aplicación, podría fácilmente eliminar todas tus tablas por ejemplo.
    – Pikoh
    Commented el 19 dic. 2017 a las 8:07

0

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

Examina otras preguntas con la etiqueta o formula tu propia pregunta.