load picture

[ALSayegh]

hi
How can i load a picture in to crystal 8.5 during run mode ?

i try this code but i get an error -
Run-time error 70
permission denied

Dim bmpHold As StdPicture

Screen.MousePointer = vbHourglass
OneM.DiscardSavedData
OneM.Database.SetDataSource rstTable
Set bmpHold = LoadPicture(App.Path & "\Picture\" & MySir & ".bmp&quot
Set OneM.Picture3.FormattedPicture = bmpHold --> ((( her i'm getting the error)))


'Rem OneM.Picture3.SetOleLocation App.Path
& "\Picture\" & MySir & ".bmp"

CRViewer1.ReportSource = OneM
CRViewer1.ViewReport
Screen.MousePointer = vbDefaul