Terimakasih mas,

dengan membandingkan info dari mas akhirnya saya temukan juga kalo mau
tetap seperti cara saya awal ada yang harus dibenarkan yakni Spt dibawah
Nah sekarang bagaimana kalo ini kita mau bikin pada Report bagaimana
cara Mohon dibantu

Private Sub Form_Current()
On Error Resume Next
Me.Image4.Picture = Me.IMAGEPATH
'Image4 adalah nama tempat gambar ditampilkan di form. IMAGEPATH nama
field pada table tempat data image4
End Sub

Private Sub Nama_AfterUpdate()
Me.IMAGEPATH = "D:\New Folder\Sj\" & Me.[IDdata] & ".bmp"
' ID data saya atur sebagai autonumber
'Me!ReportsTo.Requery yang diganti ini menjadi Me.Requery
Me.Requery
On Error Resume Next
Me.Image4.Picture = Me.IMAGEPATH
End Sub


Kirim email ke