Merhaba yapınızı bilmiyorum ama ben aşagıdaki gibi,kullanıyorrum
Dim PictureFile As String
PictureFile = CurrentProject.Path & "\TCResim\" & Forms!Frm_Kursiyerler!Adı_Soyadı & "-" & Forms!Frm_Kursiyerler!tc_numarasi & ".jpg"
If Len(Dir(PictureFile)) < 1 Then
PaTaTes = CurrentProject.Path & "\TCResim\Resimyok.jpg"
ImageFrame.Picture = PaTaTes
Else
PaTaTes = CurrentProject.Path & "\TCResim\" & Forms!Frm_Kursiyerler!Adı_Soyadı & "-" & Forms!Frm_Kursiyerler!tc_numarasi & ".jpg"
ImageFrame.Picture = PaTaTes
End If
Adı Soyadı:
Ce.... Ya....
Konum:
Ankara
Ofis Versiyonu:
Ofis 2010 32 Bit
Son Oturumu:
Bugün,02:51
Cevapla