visualizar una imagen de una base de datos

tema enviado por iratxe en Visual Basic 6.0
tema iniciado el 21/07/2007
hola a todos: Estoy intentando hacer un programa que tras introducir un codigo busque en la base de datos ese codigo y me muestre la foto correspondiente a ese codigo (la foto es un objeto de tipo ole). Jo la verdad es que no tengo ni idea de como hacerlo, si me ayudais os lo agradeceria mucho. La imagen la estoy intentando visualizar en un picturebox y utilizo DAO El codigo que he escrito es este: 'abro de nuevo la tabla de la base de datos, para encontrar los autores Set rs5 = DB.OpenRecordset("SELECT Foto from " & nomTablaFinal & " where Codigo like codigo ", dbOpenDynaset) ' Comprobar que hay datos en el recordset, en este caso solo hay 1 With rs5 If (.BOF And .EOF) Then MsgBox "No se ha encontrado ninguna foto correspondiente a ese codigo" Else 'Mostrar los datos .MoveFirst Do While Not .EOF Picture1.DataSource = rs5("Foto") Loop End If End With