What's wrong with this ?

Rat

Well-known member
Joined
Aug 2, 2005
Messages
72
Location
Somewhere between 0 and 1
Programming Experience
1-3
VB.NET:
Try
[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] FileStream [/size][size=2][color=#0000ff]As[/color][/size][size=2] FileStream = [/size][size=2][color=#0000ff]New[/color][/size][size=2] FileStream(ofdOpen.FileName, FileMode.Open, FileAccess.Read)

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] BinaryReader [/size][size=2][color=#0000ff]As[/color][/size][size=2] BinaryReader = [/size][size=2][color=#0000ff]New[/color][/size][size=2] BinaryReader(FileStream)

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] FileByteArray(FileStream.Length - 1) [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Byte

[/color][/size][size=2]BinaryReader.Read(FileByteArray, 0, [/size][size=2][color=#0000ff]CInt[/color][/size][size=2](FileStream.Length))

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] SQLCommand [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String[/color][/size][size=2] = "INSERT INTO Products (FileName,Image) VALUES (?,?)"

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] Command [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] System.Data.OleDb.OleDbCommand(SQLCommand, Connection)

Command.Parameters.Add("@FileName", System.Data.OleDb.OleDbType.VarChar).Value = FileName

Command.Parameters.Add("@Image", System.Data.OleDb.OleDbType.Binary).Value = FileByteArray

Connection.Open()

Command.ExecuteNonQuery()

MsgBox("Image Succesfully Inserted!", MsgBoxStyle.Information + MsgBoxStyle.OKOnly, "Insert Successful")

Connection.Close()

[/size][size=2][color=#0000ff]Catch[/color][/size][size=2] ex [/size][size=2][color=#0000ff]As[/color][/size][size=2] Exception

MsgBox(ex.Message + ex.Source, MsgBoxStyle.Critical + MsgBoxStyle.OKOnly, "Exception Message")

[/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Try[/color][/size]
[size=2][color=#0000ff][/color][/size] 
[size=2][color=#0000ff]

I get the following error ...
 

Attachments

  • Err.jpg
    Err.jpg
    61.8 KB · Views: 357
Back
Top