Добавление нескольких изображений в столбец SQL
Поэтому я попытался добавить несколько выбранных изображений в свою базу данных sql. Проблема в том, что когда я выбираю свои файлы изображений и фиксирую их сохранение, только 1 сохраняется в базе данных.
вот код:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim Files As New OpenFileDialog Files.Filter = "Image(*.JPG;*.PNG;*.GIF)|*.jpg;*.png;*.gif" ' Allow the user to select multiple images. Files.Multiselect = True Files.Title = "Select an image" Files.ShowDialog() 'Image.FromFile(Files.FileName) 'PictureBox1.Image = Image.FromFile(Files.FileName) Dim sqlcon As New SqlConnection("Data Source=(LocalDB)\MSSQLLocalDB;AttachDbFilename=c:\users\jj\documents\visual studio 2017\Projects\sqlpictureloader\sqlpictureloader\Pictures.mdf;Integrated Security=True") Dim sqladapt = New SqlDataAdapter("Select * from [Table]", sqlcon) sqlcon.Open() Dim cmd As SqlClient.SqlCommand Dim sql As String = "insert into [Table] values(@images)" cmd = New SqlClient.SqlCommand(sql, sqlcon) Using ms As MemoryStream = New MemoryStream() Dim bm As Bitmap = New Bitmap(Image.FromFile(Files.FileName)) bm.Save(ms, Image.FromFile(Files.FileName).RawFormat) Dim arrPic() As Byte = ms.GetBuffer() cmd.Parameters.AddWithValue("@images", arrPic) End Using PictureBox1.SizeMode = PictureBoxSizeMode.StretchImage cmd.ExecuteNonQuery() sqlcon.Close() MessageBox.Show("New Records Added") Dim dt As New DataTable Dim ds As New DataSet sqladapt.Fill(dt) DataGridView1.DataSource = dt End Sub
Я ценю вашу помощь.
Что я уже пробовал:
Я пытался сделать A для каждого оператора для файлов, которые являются растровыми, но, похоже, я не могу заставить это работать.