Ver Mensaje Individual
  #1 (permalink)  
Antiguo 01/05/2010, 20:48
Avatar de Highlander
Highlander
 
Fecha de Ingreso: junio-2006
Ubicación: Concepción, Chile
Mensajes: 475
Antigüedad: 17 años, 11 meses
Puntos: 4
Ayuda con error recuperando datos binarios

Hola tengo una imagen (foto) almacenada como binario en la base de datos, estoy tratando de recuperarla para mostrarla en una picturebox pero de da el siguiente error:

No data exists for the row/column.

en la linea : Dim imgByteData As Byte() = CType(sdr.Item("Imagen"), Byte())

Código:
mSqlServerCe.Conectar()

        Dim sql As String = "SELECT Imagen FROM PacienteImagen as Imagen WHERE (Paciente = " & CodigoPaciente & ")"
        Dim cmd As SqlCeCommand = New SqlCeCommand(sql, conexionSql)
        Dim sdr As SqlCeDataReader = cmd.ExecuteReader

        MessageBox.Show(sql)

        Dim imgByteData As Byte() = CType(sdr.Item("Imagen"), Byte())
        Dim imgMemoryStream As New IO.MemoryStream(imgByteData)
        Dim bitmap As Bitmap = New Bitmap(imgMemoryStream)
        'Dim bitmap As Bitmap=Drawing.Image.FromStream(imgMemoryStream)
        pbxVista.Image = Bitmap

        mSqlServerCe.Desconectar()
Alguna sugerencia por favor se agradece, saludos.
__________________
Ingeniero (E) en Computación e Informática
The last man alone with god.