insertar imagen de picturebox en mysql en visual b
Publicado por fdx (1 intervención) el 17/03/2009 17:38:25
Hola.
Tengo un formulario donde el usuario puede añadir una imagen medianteun boton con un opendialog, y esta imagen se muestra en el picturebox.
Mi problema esta a la hora de querer guardar la imagen en mysql, con una sentencia insert.
para esto utilizo una funcion para convertir la imagen a byte:
Public Function Image2Bytes(ByVal img As Image) As Byte()
Dim sTemp As String = Path.GetTempFileName()
Dim fs As New FileStream(sTemp, FileMode.OpenOrCreate, FileAccess.ReadWrite)
img.Save(fs, System.Drawing.Imaging.ImageFormat.Png)
fs.Position = 0
'
Dim imgLength As Integer = CInt(fs.Length)
Dim bytes(0 To imgLength - 1) As Byte
fs.Read(bytes, 0, imgLength)
fs.Close()
Return bytes
End Function
y en el boton guardar d ela aplicacion intento hacer algo así:
Dim Img() As Byte
Img = Imagen_Bytes(PictureBox1.Image)
Dim consulta As String
consulta = "Insert into imagenes(titulo,descripcion,imagen) values('" & txt_titulo.Text & "','" & txt_descripcion.Text & "','" & Img & "')"
pero me dice que = "el operador & no esta definido para los tipos string y 1-matriz dimensional de byte"
No se como solucionar esto.
¿como puedo insertar una imagen en mysql? no me interesa guardar la ruta, sino la imagen
Tengo un formulario donde el usuario puede añadir una imagen medianteun boton con un opendialog, y esta imagen se muestra en el picturebox.
Mi problema esta a la hora de querer guardar la imagen en mysql, con una sentencia insert.
para esto utilizo una funcion para convertir la imagen a byte:
Public Function Image2Bytes(ByVal img As Image) As Byte()
Dim sTemp As String = Path.GetTempFileName()
Dim fs As New FileStream(sTemp, FileMode.OpenOrCreate, FileAccess.ReadWrite)
img.Save(fs, System.Drawing.Imaging.ImageFormat.Png)
fs.Position = 0
'
Dim imgLength As Integer = CInt(fs.Length)
Dim bytes(0 To imgLength - 1) As Byte
fs.Read(bytes, 0, imgLength)
fs.Close()
Return bytes
End Function
y en el boton guardar d ela aplicacion intento hacer algo así:
Dim Img() As Byte
Img = Imagen_Bytes(PictureBox1.Image)
Dim consulta As String
consulta = "Insert into imagenes(titulo,descripcion,imagen) values('" & txt_titulo.Text & "','" & txt_descripcion.Text & "','" & Img & "')"
pero me dice que = "el operador & no esta definido para los tipos string y 1-matriz dimensional de byte"
No se como solucionar esto.
¿como puedo insertar una imagen en mysql? no me interesa guardar la ruta, sino la imagen
Valora esta pregunta


0