Foros del Web - imagenes en mysql

Bueno lo prometido es deuda, tras unos dias de desfase total xD
aqi teneis ya el codigo de como subir una imagen a una base de datos mysql (o la que sea) y además el como mostrarla, utilizo DataTable tipados, que facilitan muy mucho la labor de manejar la base de datos.

Codigo de Subida:

Código:

'Data Table instanciado en el load (Me.dtToma, BD de prueba).
 'Indico la imagen con un dialogo, comprobando que se selecione algun fichero
 ' El filtro sera: (.JPG)|.JPG (en mi caso).
 IfMe.dlgImagen.ShowDialog() = Windows.Forms.DialogResult.OK AndAlsoMe.dlgImagen.FileName IsNotNothingThen
 'Creo una nueva fila y la instancio (dandole ademas la estructura de los campos)
 Dim drToma As tomaRow = Me.dtToma.NewtomaRow
 If IsDBNull(Me.dtToma.Compute("MAX(ID)", "")) Then
 drToma.ID = 1
 Else
 drToma.ID = Me.dtToma.Compute("MAX(ID)", "") + 1
 EndIf
 'Convierto la imagen a BYTE's y se la asigno al campo de la BD que sea del tipo BLOB (o su hermano mayor -LONGBLOB-
 drToma.ima = System.IO.File.ReadAllBytes(Me.pctImagen.ImageLocation)
 'A¤ado la fila a la tabla.
 Me.dtToma.AddtomaRow(drToma)

 
 Dim sError AsString
 'Guardo la tabla.
 sError = GuardarToma(Me.dtToma)
 If sError <> ""Then
 MessageBox.Show(sError)
 EndIf
 EndIf

Código de Muestreo:

Código:

IfMe.ListBox1.SelectedItem IsNotNothingThen
 Dim imag AsNew ImageConverter
 Dim drToma As tomaRow = Me.dtToma.FindByID(Me.ListBox1.SelectedValue)
 'Convierto los byte's a tipo imagen con el control ImageConverter
 Me.PictureBox1.Image = imag.ConvertFrom(drToma.ima)
 EndIf