La Web del Programador: Comunidad de Programadores
 
    Pregunta:  65360 - IMAGENES EN INFOME
Autor:  francisco herraiz alonso
he realizado una bd sobre jugadores de futbol en diversas categorias, en el formulario de alta del jugador esta su fotografia que se vincula con un txt (nombre de la fotografia ) y un cuadro imagen . en el formulario funciona perfectamene , pero en el informe no puedo colocar la imagen del jugador. Creyendo que asi podria hacerlo lo he intentado con este codigo en " al dar formato " del informe :

imagen.visible = true
imagen.Picture = foto

err.........

gracias por vuestra atencion

  Respuesta:  Carlos Marin
Mira la mejor forma de lograr tu cometido es guardar las graficas que quieres cargar en los formularios e informes en una carpeta.
Creas una tabla con un campo que se puede llamar ubicación de archivos y alli guardas la ruta de la carpeta que contiene las imagenes.
Luego en el código del formulario puedes utilizar una expresión como la siguiente asociada a un cuadro de imagen para que este busque la foto necesitada y la cargue en el campo:

Private Sub Report_Activate()
NB = Reports("Informe_A").CurrentRecord

Ubica = DLookup("Ubicación", "UbicacionArchivos")
On Error Resume Next
Err.Clear
Foto.Picture = Ubica & "" & Equipo & ".jpg"
If Err Then Foto.Picture = Ubica & " ohay.bmp"
Err.Clear

Esque.Picture = Ubica & "" & Esquema & ".jpg"
If Err Then Esque.Picture = Ubica & "Nohay.bmp"
Err.Clear
End Sub

De esta forma puedes utilizar esta herramienta en cualquier lugar del programa y cargar las imagenes que necesites.