مشکل نمایش عکس از دیتابیس

[Amir - B 184]

سلام دوستان

بنده با نمایش عکس از دیتابیس مشکل دارم و کد زیر رو خطا میگیره . 

bytes=cur1.GetBlob("pictures")

اینم تمام کد : 

Sub Process_Globals
Dim sq As SQL
Dim sr As String
End Sub

Sub Globals
Dim cu As Cursor
	Private ListView1 As ListView
	Private ImageView2 As ImageView
End Sub

Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("ff")

File.Copy(File.DirAssets,"qq.db",File.DirInternal,"qq.db")


sq.Initialize(File.DirInternal,"qq.db",False)


cu = sq.ExecQuery("SELECT * FROM re")

For i=0 To cu.RowCount-1
	cu.Position = i
	ListView1.AddSingleLine(cu.GetString("esm"))
Next


End Sub

Sub Activity_Resume

End Sub

Sub Activity_Pause (UserClosed As Boolean)

End Sub



Sub ListView1_ItemClick (Position As Int, Value As Object)

	ImageView2.Bitmap = Namayesh(" نام 1")
End Sub


Sub Namayesh(esm As String) As Bitmap
Dim cur1 As Cursor
cur1=sq.ExecQuery("SELECT * FROM re WHERE Esm='"& esm & "'")
cur1.Position=0

Dim bytes() As Byte
bytes=cur1.GetBlob("pictures")

Dim input As InputStream
input.InitializeFromBytesArray(bytes,0,bytes.Length)

Dim b As Bitmap
b.Initialize2(input)
input.Close
Return(b)
End Sub