Photo not showing

  • Thread starter Thread starter Jason
  • Start date Start date
J

Jason

Access 97. I'm using the following code to embed photo but it is not being
saved:

With Forms(stDocName)
AssetPhotoPath = Nz(AssetPhotoPath, "")
!AssetPhotoPath = AssetPhotoPath
!AssetPhoto.OLETypeAllowed = acOLELinked
!AssetPhoto.SourceDoc = AssetPhotoPath
!AssetPhoto.Action = acOLECreateLink
End With

Thansk,
J.
 
Not to leave the false impression that I really know this stuff, but your
code looks way more complicated than it needs to be.

e.g to display a picture in a form we just have the following in the form's
"on current" event:

Private Sub Form_Current()

Me.Image17.Picture = Me.PicturePathAndFile

End Sub


Me.Image17 is the name of the box, and PicturePathAndFile is the name of the
text field that stores the lication and file name of the picture.
 
This was the code I was given by someone on here or was referred to a site
that contained it. Shall try your code when I get time to test it.

Thanks,
J.
 
Back
Top