webprogramacion.com >
Programacion >
VB.NET > Almacenar imágenes desde Visual Basic.NET
Almacenar imágenes desde Visual Basic.NET (VB.NET)
Supongamos una tabla Imágenes que tenga los siguientes campos:
IMAGENES(idimagen,imagen)
El campo imagen será del tipo longblob.
El código sería el siguiente:
Dim cn As OleDbConnection
Dim sqlActualizar As MySqlCommand
Dim FileSize UInt32
Dim rawData() As Byte
Dim fs As FileStream
Dim oImg As Image
cn = new MySqlConnection("Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1");
sqlActualizar = New MySqlCommand()
fs = New FileStream("c:\imagen.jpg", FileMode.Open, FileAccess.Read)
cm = New OleDbCommand()
FileSize = fs.Length
rawData = New Byte(FileSize) {}
fs.Read(rawData, 0, FileSize)
fs.Close()
oImg = Image.FromFile(txtDocumento.Text)
sqlActualizar = New MySqlCommand("INSERT INTO imagenes(imagen) VALUES(?imagen)")
sqlActualizar.Parameters.Add("?imagen", rawData)
cn.open()
cm.CommandText = sqlActualizar
cm.CommandType = CommandType.Text
cm.Connection = cn
cm.ExecuteNonQuery()
cn.Close()
Autor del artículo
Dámaso Velázquez
Compartir