En este ejemplo vamos a ver cómo eliminar un registro de una base de datos MySql.
Necesitamos incluir el siguiente código al comienzo del formulario:
Imports System.Data.MySql
Veamos el código necesario para eliminar un registro en una tabla con las siguientes características:
PERSONAS(idpersona,nombre,apellido)
Supongamos que idpersona lo tenemos almacenado en una caja de texto llamada txtIdPersona
La base de datos está localizada en un servidor MySQL.
El código sería el siguiente:
Dim cn As MySqlConnection
cn = New MySqlConnection(«Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1»)
cn.Open()
Dim cm As MySqlCommand
cm = New MySqlCommand(«DELETE FROM personas WHERE idpersona=?idpersona»)
cm.Parameters.Add(«?idpersona», MySqlDbType.Int32)
cm.Parameters(«?idpersona»).Value = txtIdPersona.Text
cm.Connection = cn
cm.ExecuteNonQuery()
cn.Close()
cn = New MySqlConnection(«Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1»)
cn.Open()
Dim cm As MySqlCommand
cm = New MySqlCommand(«DELETE FROM personas WHERE idpersona=?idpersona»)
cm.Parameters.Add(«?idpersona», MySqlDbType.Int32)
cm.Parameters(«?idpersona»).Value = txtIdPersona.Text
cm.Connection = cn
cm.ExecuteNonQuery()
cn.Close()