Как восстановить изображение из базы данных acces с помощью datareader в VB.NET
Я использую следующий код для хранения изображения в базе данных access, и теперь я хочу получить изображение через data reader, пожалуйста, помогите мне.
[удален дубликат кода]
Что я уже пробовал:
Try Dim ms As New System.IO.MemoryStream Dim bmpImage As New Bitmap(stphoto.Image) bmpImage.Save(ms, System.Drawing.Imaging.ImageFormat.Jpeg) bytImage = ms.ToArray() ms.Close() Dim con As New OleDb.OleDbConnection Dim cmd As New OleDb.OleDbCommand Dim sqlstring As String Dim query As String sqlstring = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=bin\fee.accdb" con = New OleDb.OleDbConnection(sqlstring) con.Open() query = "INSERT INTO smaster ([sid],[sname],[fname],[add],[dob],[class],[college],[session],[cnumber],[gnumber],[photo]) Values (" & sidtxt.Text & ",'" & snametxt.Text & "','" & fnametxt.Text & "','" & addtxt.Text & "','" & dobpick.Value.ToShortDateString & "','" & classcombo.Text & "', '" & collegecombo.Text & "','" & sessioncombo.Text & "','" & mobtxt.Text & "','" & gnumbertxt.Text & "','@bytImage')" cmd = New OleDb.OleDbCommand(query, con) cmd.ExecuteNonQuery() studentid = sidtxt.Text studentname = snametxt.Text 'code for opening add subject form Dim result As Integer = MessageBox.Show("Master Data Saved, Please Click OK for adding Subjects", "Student Data", MessageBoxButtons.OK) If result = DialogResult.OK Then addsub.Show() End If Catch ex As Exception MessageBox.Show(ex.Message) End Try
Graeme_Grant
Вы вытаскиваете его так же, как и вставляете.
Кроме того, никогда не объединяйте SQL-запросы, всегда используйте параметры.
Member 13397933
Не могли бы вы объяснить через код вышеописанную проблему, это будет легко понять для меня.