Uso Visual Basic .NET y MariaDB.
Quisiera saber cómo puedo hacer para que a la hora de insertar un dato a la base de datos, si está repetido, solo sume la cantidad y si no existe ningún registro parecido que haga uno nuevo.
Soy prácticamente nuevo y no sé mucho. Cualquier ayuda me serviría.
Éste es el código que usé para agregar datos. ¿Cómo podría modificarlo?
Try
CONN = New MySqlConnection(STR)
CONN.Open()
If MessageBox.Show("Esta seguro que desea guardar los datos escritos? ", "GUARDAR", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = MsgBoxResult.Yes Then
Dim query As String = "insert into entradas (NO_DE_PARTE, CANTIDAD_INGRESADA, DESCRIPCION, MARCA, TIPO_DE_PIEZA, PROYECTO, FECHA_DE_INGRESO) values
(@NO_DE_PARTE, @CANTIDAD_INGRESADA, @DESCRIPCION, @MARCA, @TIPO_DE_PIEZA, @PROYECTO, @FECHA_DE_INGRESO)"
CMD = New MySqlCommand(query, CONN)
CMD.Parameters.Add("@NO_DE_PARTE", MySqlDbType.VarChar, 50)
CMD.Parameters.Add("@CANTIDAD_INGRESADA", MySqlDbType.Decimal, 18.0)
CMD.Parameters.Add("@DESCRIPCION", MySqlDbType.VarChar, 50)
CMD.Parameters.Add("@MARCA", MySqlDbType.VarChar, 50)
CMD.Parameters.Add("@TIPO_DE_PIEZA", MySqlDbType.VarChar, 50)
CMD.Parameters.Add("@PROYECTO", MySqlDbType.VarChar, 50)
CMD.Parameters.AddWithValue("@FECHA_DE_INGRESO", Date.Today.Date)
CMD.Parameters("@NO_DE_PARTE").Value = Me.TXT_NO_PART.Text.ToUpper.ToString
CMD.Parameters("@CANTIDAD_INGRESADA").Value = Me.TXT_C_INGRES.Text.ToString
CMD.Parameters("@DESCRIPCION").Value = Me.DES_TXT.Text.ToUpper.ToString
CMD.Parameters("@MARCA").Value = Me.TXT_MARC.Text.ToUpper.ToString
CMD.Parameters("@TIPO_DE_PIEZA").Value = Me.TXT_TIPO_PIEZA.Text.ToUpper.ToString
CMD.Parameters("@PROYECTO").Value = Me.TXT_PROYECT.Text.ToUpper.ToString
CMD.Parameters("@FECHA_DE_INGRESO").Value = Me.FECHA_DATE.Value
CMD.Connection = CONN
CMD.ExecuteNonQuery()
MessageBox.Show("Los datos se registraron correctamente", "Nuevo Dato", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If
CONN.Close()
Catch ex As Exception
MessageBox.Show(ex.Message.ToString)
Finally
CONN.Close()
End Try