Hi
I am storing images in an access database, based on an MSDN article.
The code i use to store is as follows:
<code>
'Create the command object
Dim command As New OleDbCommand("I mageBlobUpdate" , dataConnection)
Command.Command Type = CommandType.Sto redProcedure)
'Get the byte array from the posted file
Dim stream As IO.Stream = sourceFile.Impu tStream ' sourceFile is a
HttpPostedFile object
Dim bytes(Cint(stre am.Length() - 1)) As Byte
stream.Read(byt es, 1, bytes.Length)
stream.Close
'Update the record
command.Paramet ers.Add("id", id)
Dim parameter As New OleDbParameter( "[Image]"),
OleDbType.LongV arBinary, bytes.Length, ParameterDirect ion.Imput,
False, 0, 0, Nothing, DataRowVersion. Current, bytes)
command.Paramet ers.Add(paramet er)
command.Execute NonQuery
</code>
This updates the database fine. I then use the following code to
extract it and convert it to the image:
<code>
'Get a reader containing the image data
Dim command As New OleDbCommand("I mageBlobSelect" , dataConnection)
Command.Command Type = CommandType.Sto redProcedure)
command.Paramet ers.Add("id", id)
Dim reader As OleDbDataReader = command.Execute Reader
'Get the image from the reader
If reader.HasRows Then
reader.Read
Dim bytes(CInt(read er.GetBytes(0, 0, Nothing, 0, Integer.MaxValu e)
- 1)) As Byte
reader.GetBytes (0, 0, bytes, 0, bytes.Length)
Dim stream As New IO.MemoryStream (bytes, 0, bytes.Length)
Dim image As System.Drawing. Image =
System.Drawing. Image.FromStrea m(stream)
End If
'Tidy Up
reader.Close
</code>
When running the code, the error 'Invalid parameter used' is occurs on
the line:
Dim image As System.Drawing. Image =
System.Drawing. Image.FromStrea m(stream)
If i simply write the stream to file, then the file that is created is
the same size as the original image, however it cannot be viewed in
any editor.
The original image is a .JPG.
Any ideas greatly appreciated, I have searched and most solutions
relate to the image header offset, but i do not think this is the
issue.
Cheers
jaffar
