バイト配列からjpegを表示する際のパラメータエラー

Question

画像はIMAGE/PJPEGの画像タイプです。

私はBLOBイメージをプルダウンしています。イメージボックスに表示するか、イメージカラムを表示する必要があります。しかし、私の問題は画像がJPEGであることによると思います。これを修正する方法がわかりません。

For i As Integer = DataGridView1.Rows.Count - 1 To 0 Step -1 

     Dim MTI_Image As Byte() 

     STSQL = "Select IMAGE from mpcs.image_resource WHERE IMAGE_NAME = '01400010016.jpg'" 

     rsMPCS = MPCS_SELECT_SQL(UCase(STSQL), rsMPCS) 
     rsMPCS.Read() 
     MTI_Image = rsMPCS("IMAGE") 
     rsMPCS.Close() 

     Using memory As MemoryStream = New MemoryStream(MTI_Image) 

      'Dim newImage = Image.FromStream(memory) 'didn't work 
      Dim newImage As Bitmap = New Bitmap(memory) 'ERROR HERE 

      Dim ColImage As New DataGridViewImageColumn 
      Dim Img As New DataGridViewImageCell 
      DataGridView1.Columns.Add(ColImage) 
      ColImage.HeaderText = "Image" 
      ColImage.Name = "ColImg" 
      Img.Value = newImage 
      DataGridView1.Rows(0).Cells.Add(Img) 

     End Using 
    Next 

これは画像の挿入方法です。

 Dim temp As String = OpenFileDialog1.FileName 
     Dim FileStream As Stream = System.IO.File.OpenRead((temp)) 
     Dim array() As Byte = File.ReadAllBytes(temp) 

     Using memory As MemoryStream = New MemoryStream(array) 
      Using reader As BinaryReader = New BinaryReader(memory) 

そしてreader.ReadByte

だっ挿入するために使用される値は何かここでそれはそれを表示するから私を停止している何とかそれを破損はありますか？ （私は作品を知っている5試してみました）

UPDATEだから画像を使用した後、私は作品を知っています。私はその行/列の下のコードを使用してDATAがないと言われます。ここで

For i As Integer = DataGridView1.Rows.Count - 1 To 0 Step -1 

     STSQL = "Select IMAGE from MPCS.IMAGE_RESOURCE WHERE IMAGE_NAME = 'ThermalEtch.JPG'" 

     rsMPCS = MPCS_SELECT_SQL(UCase(STSQL), rsMPCS) 

     rsMPCS.Read() 
     Dim byteImage() As Byte = rsMPCS("IMAGE") 'ERROR HERE. 

     Using memory As MemoryStream = New MemoryStream(byteImage) 

      Dim newimage As Bitmap = New Bitmap(memory) 

      Dim ColImage As New DataGridViewImageColumn 
      Dim Img As New DataGridViewImageCell 
      DataGridView1.Columns.Add(ColImage) 
      ColImage.HeaderText = "Image" 
      ColImage.Name = "Image" 
      Img.Value = newimage 
      DataGridView1.Rows(i).Cells.Add(Img) 

     End Using 
    Next 

MPCS_SLECT_SQL

Public Function MPCS_SELECT_SQL(ByVal strSQL As String, Optional ByRef readerObj As OleDbDataReader = Nothing) As OleDbDataReader 'ADODB.Recordset 
    Try 


     If OPEN_CONNECTIONS() = False Then 
      MessageBox.Show("Error connecting to database.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Stop) 
      MPCS_SELECT_SQL = Nothing 
      Exit Function 
     Else 


      If Not readerObj Is Nothing Then 
       If readerObj.IsClosed - False Then readerObj.Close() 
      End If 
      Dim cmdMPCS As OleDbCommand = New OleDbCommand(strSQL, conMPCS) 

      MPCS_SELECT_SQL = cmdMPCS.ExecuteReader() 
      cmdMPCS.Dispose() 

     End If 

    Catch ex As Exception 
     MessageBox.Show(ex.ToString & "  " & strSQL) 
     Stop 
     Return Nothing 
    End Try 

End Function 

Answer 1

は、OracleからのBLOBデータを読み取るには、あなたがあなたのMemoryStreamを構築するGetBytesし、バッファを使用する必要があります。私はOracleがでテストする必要はありませんが、このようなものは、私は、コードをクリーンアップするヘルパーメソッドでこれを置く

rsMPCS = MPCS_SELECT_SQL(UCase(STSQL), rsMPCS) 
rsMPCS.Read() 

Dim bufferSize = 10000 
Using ms = New MemoryStream() 
    Dim buffer(bufferSize - 1) As Byte 
    Dim pos = 0L 
    Dim bytesRead = rsMPCS.GetBytes(0, pos, buffer, 0, bufferSize) 
    While bytesRead > 0 
     ms.Write(buffer, 0, CInt(bytesRead)) 
     pos += bytesRead 
     bytesRead = rsMPCS.GetBytes(0, pos, buffer, 0, bufferSize) 
    End While 
    Dim newimage = New Bitmap(ms) 
    '... add to grid 
End Using 

... SQL Serverと働きました。