SoloCodigo

Me gustaría meter en un Report una imagen. Por ahora facil!!! Pero esta imagen la voy modificando dependiendo del resultado que salga. Es decir que si el archivo introducido tiene una foto de un coche rojo y ahora modifico la fono del coche con uno verde pues el crystal no la cambia y me deja la del rojo.
Como puedo hacerlo????

El siguiente código es el que utilizo para meter una imagen dinamica desde crystal pero no funciona al decirme que no tengo permisos y soy administrador de mi máquina.

Private Sub Report_NoData(pCancel As Boolean)
Dim objJPEG As StdPicture

Set objJPEG = LoadPicture("C:arbolpiezabmp.bmp")

Set OleLogo.FormattedPicture = objJPEG

Set objJPEG = Nothing

End Sub

Bueno al final lo descubrí se trata de poner el mismo código pero en un Sub diferente es decir por ejemplo:

Private sub MUESTRA_IMG
Dim objPic As StdPicture
 
    Set objPic = LoadPicture("c:arbolpieza.jpg")
    Set OLEimg.FormattedPicture = objPic    'Aqui estamos asignando la imagen
    Set objPic = Nothing

    CR2.r
End Sub
Después una vez lanzado el REPORT sólo tenemos de llamar a este sub y seremos más listos, más felices, más buenos y mucho más inutililes ya que somos los únicos profesionales que siempre tenemos de estudiar "Nuevas TI" y además luego no nos sirven de nada.
Que le pregunten a aquella gente que dominaba LOGO, QBasic, Novel, etc. si ahora casi ni se usan..