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..
Sürekli Form ve Raporda Fotoğraf Gösterme
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ı.
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ı.
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Konfüçyüs
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
Son Düzenleme: 13/01/2010, 20:32, Düzenleyen: derebeyi.
Sn:derebeyi
Ofis 2007 de bu özellik zaten var.
Ofis 2007 de bu özellik zaten var.
Sn ogulcan 2003 kullanıyorum..
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
Bildiğini bilenin arkasından git, bildiğini bilmeyeni uyar, bilmediğini bilene öğret, bilmediğini bilmeyenden kaç.
Konfüçyüs
Konfüçyüs
Konuyu Okuyanlar: 1 Ziyaretçi