AccessTr.neT
Sürekli Form ve Raporda Fotoğraf Gösterme - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Sürekli Form ve Raporda Fotoğraf Gösterme (/konu-surekli-form-ve-raporda-fotograf-gosterme.html)

Sayfalar: 1 2


Sürekli Form ve Raporda Fotoğraf Gösterme - derebeyi - 13/01/2010

Saygıdeğer üstadlarım, sitede birçok fotoğraf ekleme örneği mevcut. Bunlardan biriside şimdi eklediğim ayhan2122 hocamın örneği, ancak hiç birisinde aradığımı bulamadım. Hepsinde aynı problem var.
Problem; Sürekli form veya raporda resim/fotoğraf gösterdiğinde birden fazla kayıt olmasına rağmen hepsinde ilk kayda ait resim/fotoğraf görüntülenmekte, hangi kayda tıklanırsa (sürekli formda) o kaydınkini getirerek hepsini değiştirmekte,

İstek; Her iki durumda da her kaydın kendisine ait fotoğrafın görüntülenmesini istiyorum. Saygılarımla..


Cvp: Sürekli Form ve Raporda Fotoğraf Gösterme - Seruz - 13/01/2010

Rapor kolayda, Sürekli formda maalesef bildiğim bir yöntem yok.

Sürekli form yerine, İlişkisiz formda ADO kullanarak yaptığım bir çözüm var. Onu incele.
Toplu Resim Gösterimi

Sanırım bu dosyada rapor örneği de vardı.


Cvp: Sürekli Form ve Raporda Fotoğraf Gösterme - derebeyi - 13/01/2010

Sayın seruz hocam, Raporda kolay olduğunu belirtmişsiniz. Benim için asıl önemli olanda bu zaten.. Birden fazla personelin listesini yanlarında fotoğrafları ile birlikte raporlamam gerekiyor. Yönlendirdiğiniz örneğe baktım, çözüm bulamadım. ayhan hocamın örneğinde raporlama olayını halledebilirseniz minnettar olurum.Saygılarımla


Cvp: Sürekli Form ve Raporda Fotoğraf Gösterme - ogulcan92 - 13/01/2010

Sn:derebeyi
Ofis 2007 de bu özellik zaten var.


Cvp: Sürekli Form ve Raporda Fotoğraf Gösterme - derebeyi - 13/01/2010

Sn ogulcan 2003 kullanıyorum..


Cvp: Sürekli Form ve Raporda Fotoğraf Gösterme - Seruz - 13/01/2010

Aslında kodları doğru yazmışsınız ama raporun activate olayına değil de raporun Detail kısmının Print olayına yazacaksınız. (Ayrıntı-Basıldığında olayı)

Kod:
Private Sub Ayrıntı_Print(Cancel As Integer, PrintCount As Integer)
Dim Patates

    If IsNull(SrNO) Then
        ImageFrame.Picture = Empty
    Else
        Patates = CurrentProject.Path & "\Photos\" & Me.SrNO & ".jpg"
        ImageFrame.Picture = Patates
    End If

End Sub