Saving Image to database

[Dav]

Hi all,

I am using these code to save Image to database:
Dim fs As FileStream = New FileStream(file name, _
FileMode.OpenOr Create, FileAccess.Read )
Dim rawData() As Byte = New Byte(fs.Length) {}
fs.Read(rawData , 0, System.Convert. ToInt32
(fs.Length))
fs.Close()

OleDbDataAdapte r1.InsertComman d.CommandText = _
"Insert Into ImageTest Values (" & rawData & ")"
OleDbDataAdapte r1.InsertComman d.ExecuteNonQue ry()
MsgBox("Image saved to database")

But there is a problem in :
"Insert Into ImageTest Values (" & rawData & ")"

The error message is
Operator '&' is not defined for types 'String' and '1-
dimensional array of Byte'.

Anyone can help
Thanks

[Peter Proost]

Hi maybe this piece of code can help you

Dim ms As New System.IO.Memor yStream()
Dim arrImage() As Byte
PictureBox1.Ima ge.Save(ms, PictureBox1.Ima ge.RawFormat.Jp eg)
arrImage = ms.GetBuffer()
ms.Close()
Dim updCommand As SqlCommand
Try
updCommand = New SqlCommand("Upd ate table set bitmap= @bitmap where
code=@code)
updCommand.Para meters.Add(New SqlParameter("@ bitmap", SqlDbType.Image ))
updCommand.Para meters.Add(New SqlParameter("@ code", SqlDbType.Char) )
updCommand.Para meters("@code") .Value = 'Your code field
if arrImage Is Nothing Then
updCommand.Para meters("@bitmap ").Value = DBNull.Value
Else
updCommand.Para meters("@bitmap ").Value = arrImage
End If
updCommand.Conn ection = 'Your connection
updCommand.Conn ection.Open()
updCommand.Exec uteNonQuery()
updCommand.Conn ection.Close()

Catch ex As Exception
MsgBox(ex.tostr ing)
end try
"Dav" <an*******@disc ussions.microso ft.com> wrote in message
news:0d******** *************** *****@phx.gbl.. .

Hi all,

I am using these code to save Image to database:
Dim fs As FileStream = New FileStream(file name, _
FileMode.OpenOr Create, FileAccess.Read )
Dim rawData() As Byte = New Byte(fs.Length) {}
fs.Read(rawData , 0, System.Convert. ToInt32
(fs.Length))
fs.Close()

OleDbDataAdapte r1.InsertComman d.CommandText = _
"Insert Into ImageTest Values (" & rawData & ")"
OleDbDataAdapte r1.InsertComman d.ExecuteNonQue ry()
MsgBox("Image saved to database")

But there is a problem in :
"Insert Into ImageTest Values (" & rawData & ")"

The error message is
Operator '&' is not defined for types 'String' and '1-
dimensional array of Byte'.

Anyone can help
Thanks

[Herfried K. Wagner [MVP]]

"Dav" <an*******@disc ussions.microso ft.com> schrieb:

I am using these code to save Image to database:

If you store the images as a BLOB:

HOW TO: Read and Write a File to and from a BLOB Column by Using ADO.NET and
Visual Basic .NET
<URL:http://support.microso ft.com/?scid=kb;EN-US;316887>

HOW TO: Read and Write a File to and from a BLOB Column by Using Chunking in
ADO.NET and Visual Basic .NET
<URL:http://support.microso ft.com/?scid=kb;EN-US;317034>

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Cor Ligthert]

Herfried,

Did you look at the problem?
I cannot see what your links has to do with it.
Maybe can you edify me.

The problem is inserting in a database.

Cor
"Herfried K. Wagner [MVP]"

"Dav" <an*******@disc ussions.microso ft.com> schrieb:

I am using these code to save Image to database:

If you store the images as a BLOB:

HOW TO: Read and Write a File to and from a BLOB Column by Using ADO.NET
and
Visual Basic .NET
<URL:http://support.microso ft.com/?scid=kb;EN-US;316887>

HOW TO: Read and Write a File to and from a BLOB Column by Using Chunking
in
ADO.NET and Visual Basic .NET
<URL:http://support.microso ft.com/?scid=kb;EN-US;317034>

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>

[Cor Ligthert]

Dav,

I don't see you use a dataset, so probably is this an answer what maybe can
be the solution for your problem.

\\\
Dim strSQL As String = "INSERT INTO imageTest (MyPictureField ) VALUES
(@MyParam)"
Dim cmd As New OleDbCommand(st rSQL, MyConnection)
cmd.Parameters. Add("@MyParam", rawData)
Conn.Open()
cmd.ExecuteNonQ uery()
///
I did not test it, however it should be something as this,

I hope it helps?

Cor

"Dav" <an*******@disc ussions.microso ft.com>

Hi all,

I am using these code to save Image to database:
Dim fs As FileStream = New FileStream(file name, _
FileMode.OpenOr Create, FileAccess.Read )
Dim rawData() As Byte = New Byte(fs.Length) {}
fs.Read(rawData , 0, System.Convert. ToInt32
(fs.Length))
fs.Close()

OleDbDataAdapte r1.InsertComman d.CommandText = _
"Insert Into ImageTest Values (" & rawData & ")"
OleDbDataAdapte r1.InsertComman d.ExecuteNonQue ry()
MsgBox("Image saved to database")

But there is a problem in :
"Insert Into ImageTest Values (" & rawData & ")"

The error message is
Operator '&' is not defined for types 'String' and '1-
dimensional array of Byte'.

Anyone can help
Thanks

[Herfried K. Wagner [MVP]]

"Cor Ligthert" <no************ @planet.nl> schrieb:

The problem is inserting in a database.

I know that.

--
M S Herfried K. Wagner
M V P <URL:http://dotnet.mvps.org/>
V B <URL:http://dotnet.mvps.org/dotnet/faqs/>