this is my save function
Private Sub SAVECATEGORY_Click(sender As Object, e As EventArgs) Handles SAVECATEGORY.Click
Dim arrImage() As Byte
Dim mstream As New System.IO.MemoryStream()
Dim FileSize As UInt32
FileSize = mstream.Length
'CLOSES THE CURRENT STREAM AND RELEASE ANY RESOURCES ASSOCIATED WITH THE CURRENT STREAM
' Dim ms As New MemoryStream '...........need to Imports System.IO from general
' PictureBox1.Image.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg)
' PictureBox1.Image.Save(ms, System.Drawing.Imaging.ImageFormat.Gif)
PictureBox1.Image.Save(mstream, System.Drawing.Imaging.ImageFormat.Png) ' ........save IMAGE
'RETURNS THE ARRAY OF UNSIGNED BYTES FROM WHICH THIS STREAM WAS CREATED
arrImage = mstream.GetBuffer()
mstream.Close()
If PictureBox1.Image Is Nothing Then
MessageBox.Show("Please Insert image ")
addcategoryclear() 'you call ddcategoryclear() to clear textbox and picturebox
ElseIf TextBox1.Text = "" Then
MessageBox.Show("Please Insert Image Name")
addcategoryclear() 'you call ddcategoryclear() to clear textbox and picturebox
Else
'..............
'..............
cn.Open()
Dim command As New MySqlCommand("INSERT INTO `category`( `IMG`, `NAME`) VALUES (@IMG,@NAME)", cn)
With command.Parameters
.AddWithValue("@IMG", arrImage)
' .Add("@IMG", MySqlDbType.Blob).Value = mstream.ToArray()
.AddWithValue("NAME", TextBox1.Text)
End With
If command.ExecuteNonQuery() = 1 Then
MessageBox.Show("You Successfully Save")
addcategoryclear() 'you call ddcategoryclear() to clear textbox and picturebox
loadcategory()
Else
MessageBox.Show("Something Wrong Pleas Try again")
End If
cn.Close()
End If
Me.Refresh()
End Sub