(02/08/2019, 16:01)ozanakkaya yazdı: Raporun ayrıntısının biçimlendiğinde olayına

Kod:

me.resimalani.picture = "c:\resim\" & me.adisoyadi & ".jpg"

şeklinde kod eklemelisin


https://accesstr.net/konu-tabloya-resim-...rnegi.html bağlantısında form üzerinden tabloya resim bilgisi kaydetme ile ilgili örnek mevcut.

hocam  şeklinde düzenledim fotoğraf yoksa hata çalişiyor ama fotoğraf olsa bile foto gelmiyor. hatam nerede

Alıntı:varmi = Me.ADI_SOYADI
adres = "C:\resimler\"
If varmi = "" And Dir(adres & varmi & ".jpg") = "" Then
    Me.img.Picture = adres & varmi & ".jpg"
   
ElseIf varmi <> "" And Dir(adres & varmi & ".jpg") = "" Then
        'picture not there!
        MsgBox "Klasörde " & Me.ADI_SOYADI & " fotoğrafı yok ", vbCritical + vbOKOnly
 
End If
End Sub

(02/08/2019, 16:10)halily yazdı: accessde öncelikle tablonuzda resmin adresinin olduğu bir alan olmalı daha sonra forma bir resim çerçevesi eklemeniz gerekiyor
daha sonra resim çerçevesinin resim kaynağına tablodaki resmin alanını bağlamalısınız en basit haliyle böyle anlatabilirim
eğer doğrudan kişi adı ile resmin adı aynı ise çok sorun çıkarmaz

cevabiniz için teşekkür ederim aslında ben sisteme resim kaydetmek istemiyorum sistemde isimi yazan kişilerin belirttiğim klasörde fotoları varsa görünmesini yoksa boş kalmasini istiyorum..

if kısmı hatalı o nedenle sorun çıkıyor, kodu aşağıdaki gibi dener misiniz?
If Len(Dir(adres & varmi & ".jpg")) > 0 Then

(02/08/2019, 18:58)halily yazdı: if kısmı hatalı o nedenle sorun çıkıyor, kodu aşağıdaki gibi dener misiniz?
If Len(Dir(adres & varmi & ".jpg")) > 0 Then

olmadı hocam

6. mesajdaki eki güncelledim tekrar dener misiniz eki?

(02/08/2019, 19:30)halily yazdı: 6. mesajdaki eki güncelledim tekrar dener misiniz eki?

olmadi bu yanlış isim olduğunda ad_soyad a onlari ekliyor   
bu arada ben isimi kendim yazmıyorum rapor olarak çıktıda yazdırıyorum ondan dolayi olailir mi