dengan cara yang sama di event on current form, lakukan langkah tersebut di event detail format report:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
If Nz(Me.FileFoto, "") = "" Then
Me.imgFoto.Picture = ""
Else
If IsFileExists(tImagePath & Me.FileFoto) Then
On Error Resume Next 'antisipasi kalau file foto gak bisa dipasang / file type salah dll.
Me.imgFoto.Picture = tImagePath & Me.FileFoto
Else
Me.imgFoto.Picture = ""
End If
End If
End Sub
regards,
a.k.
On 2/20/2015 2:01 PM, dedy heru susanto d3dy_h3rus@yahoo.com [belajar-access] wrote:
Dear AllMohon bantuanya supaya file foto bisa ditampilkan/dimunculkan di report1 agar sama seperti form1Terlampir contoh file accessnyaTerima kasih
__._,_.___
Posted by: Aksan Kurdin <aksan.kurdin@gmail.com>
| Reply via web post | • | Reply to sender | • | Reply to group | • | Start a New Topic | • | Messages in this topic (2) |
SPAM IS PROHIBITED
.
__,_._,___
Tidak ada komentar:
Posting Komentar