VB.NET显示ORACLE数据库BLOB类型图片
保存picturebox图像至ORACLE BLOB型字段没有问题:
Dim imgData(0) As Byte
Dim ms As New System.IO.MemoryStream
PictureBox1.Image.Save(ms, PictureBox1.Image.RawFormat)
ReDim imgData(ms.Length - 1)
ms.Read(imgData, 0, ms.Length)
ms.Close()
Dim strSQL As String
strSQL ="insert into member_photo(pernr,photo) values ('" & txtPERNR.Text & "',:photo)"
Dim sqlCom As New OracleCommand
sqlCom.CommandText = strSQL
sqlCom.Connection = Conn
sqlCom.Parameters.Add("photo", OracleType.Blob, imgData.Length)
sqlCom.Parameters(0).Value = imgData
sqlCom.ExecuteNonQuery()
但提取BLOB字段内容至PictureBox框报错:
Dim strSQL As String
strSQL = "select photo from member_photo where pernr='" & txtPERNR.Text & "'"
Dim cmd As OracleCommand = New OracleCommand(strSQL, Conn)
Dim dr As OracleDataReader = cmd.ExecuteReader()
If dr.Read() Then
Dim imgData() As Byte = dr.Item(0)
Dim ms As MemoryStream
ms = New MemoryStream(imgData)
Dim imageBlob As Image = Image.FromStream(ms) ' 这边报错:未处理ArgumentException 参数无效。
PictureBox1.Image = imageBlob
ms.Close()
Else
PictureBox1.Image = Nothing
End If