Skip to main content

AccessTr.neT


Raporda resim gösterme

Raporda resim gösterme

Çözüldü #1
(06/05/2009, 14:59)ayhan2122 yazdı: Çok güzel oldu Img-grin

hocam biraz eski bir konu ama yazdığınız kod benim çok işime yaradı.

fakat biriki problem var yardımcı olursanız sevinirim.
1-formda  ve raporda kişiye ait bir fotoğraf yoksa hata veriyor.(form1,rapor2
2-ben hata mesajı eklediğimde (form2,rapor3)
raporda bir kişinin resmi yoksa  bir öncekinin resmini gösteriyor. bir türlü çözemedim.

örnekte rapor3 de 3 nolu kişinin fotoğrafı olmadığı halde 2 nolu kişinin fotoğrafını gösteriyor.
yardımlarınız için teşekkürler.
.rar ResimYukleme_ayhan2122.rar (Dosya Boyutu: 60,61 KB | İndirme Sayısı: 28)
Son Düzenleme: 07/01/2015, 19:26, Düzenleyen: memox. (Sebep: rapor ismi düzeltildi)
Cevapla
#2
(07/01/2015, 19:22)memox yazdı:
(06/05/2009, 14:59)ayhan2122 yazdı: Çok güzel oldu Img-grin

hocam biraz eski bir konu ama yazdığınız kod benim çok işime yaradı.

fakat biriki problem var yardımcı olursanız sevinirim.
1-formda  ve raporda kişiye ait bir fotoğraf yoksa hata veriyor.(form1,rapor2
2-ben hata mesajı eklediğimde (form2,rapor3)
raporda bir kişinin resmi yoksa  bir öncekinin resmini gösteriyor. bir türlü çözemedim.

örnekte rapor3 de 3 nolu kişinin fotoğrafı olmadığı halde 2 nolu kişinin fotoğrafını gösteriyor.
yardımlarınız için teşekkürler.
Merhaba;
Mecvcut kodunuzu aşağıdaki ile değiştirip dener misiniz?
Kod:
Dim PictureFile As String
  PictureFile = CurrentProject.Path & "\Photos\" & SrNO & ".jpg"
   If Len(Dir(PictureFile)) < 1 Then
        PaTaTes = CurrentProject.Path & "\Photos\" & "nophoto.jpg"
       ImageFrame.Picture = PaTaTes
       
   Else
       PaTaTes = CurrentProject.Path & "\Photos\" & SrNO & ".jpg"
       ImageFrame.Picture = PaTaTes
   End If

Cevapla
#3
Hocam çok teşekkür ederim sorunum çözüldü. +rep
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task