Извлеките все изображение из моего msql и вставьте его в listview
Private Sub load_data() Dim dt As DataTable Dim sql As String Try cn = New MySqlConnection cn.ConnectionString = "data source=localhost; user id=root; database = chamchamber;" cn.Open() sql = "SELECT IMG FROM category;" cmd = New MySqlCommand(sql, cn) da = New MySqlDataAdapter dt = New DataTable da.SelectCommand = cmd da.Fill(dt) cn.Close() DataGridView1.DataSource = dt Catch ex As MySqlException MsgBox(ex.Message) Finally cn.Close() da.Dispose() End Try End Sub
Что я уже пробовал:
код сверху берет все изображение из базы данных и вставляет в datagridview1, и его нужно изменить, чтобы быть лучше, но мне нужно получить все изображение из th DB и вставить его в listview.
я все готов сохранить изображение в mysqldatabase, и я пытаюсь найти какой-то код, чтобы получить изображение из mysqldatabase и вставить его в listview
Private Sub ADDCATEGRYBNT_Click(sender As Object, e As EventArgs) Handles ADDCATEGRYBNT.Click ' picturebox1.image = Nothing 'it will work if theres no statement 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 Dim ms As New MemoryStream 'need to Imports System.IO from general PictureBox1.Image.Save(ms, PictureBox1.Image.RawFormat) ' save IMAGE cn = New MySqlConnection(constr) cn.Open() Dim command As New MySqlCommand("INSERT INTO `category`( `IMG`, `NAME`) VALUES (@IMG,@NAME)", cn) With command.Parameters .Add("@IMG", MySqlDbType.Blob).Value = ms.ToArray() .AddWithValue("NAME", TextBox1.Text) End With If command.ExecuteNonQuery() = 1 Then MessageBox.Show("You Successfully Save") Else MessageBox.Show("Something Wrong Pleas Try again") End If End If addcategoryclear() 'you call ddcategoryclear() to clear textbox and picturebox comboboxretrieve() 'you call comboBoxretrieve to Refresh ComboBox1 End Sub