Merhaba değeri forum üyeleri-değerli adminler;

Daha önce düzenlemeye çalıştığımız emlak uygulamasında resimlerin slayt şeklinde geçişlerini değerli ozan hocam sayesinde halletmiştik.

Şimdi ise emlak için yüklenen resimleri  raporda (resim yükleme olayı sınırsız olacak ancak raporda ilk 8 adeti) gösterilmesi için nasıl bir düzenleme yapmalıyız??

Yani rpr_arsa ve rpr_emlak raporlarında ilgili emlak için 8 adet resim gösterilsin istiyoruz.Raporun ebatı a4 kağıta dikey olacak şekilde ve 8 resim göstermek istiyoruz.

Örnek uygulama şu konuda https://accesstr.net/konu-accesste-resim...tml?page=2 ozan hocama ait 10.mesajda mevcuttur.




Öneri ve yardımlarınızı bekliyor saygılar sunuyorum.

Aslında yapılacak işlem çok zor değil, zira siz zor kısmı resimleri ekleyecek ve görüntüleyecek formları yaparak aşmışsınız. Şimdi formlarda resimlerin bilgisayarınızdaki dosya yollarını tuttuğu metin kutuları vardır (veritabanınızı görmediğim için genel olarak yapılabilecekler üzerinden yorum yapmak durumundayım) 
yeni bir rapor oluşturarak içerisine resim çerçevelerini ekleyin. Bu resim çerçevelerinin kayıt kaynağını formdaki resim yollarını içeren kayıt kaynaklarıyla eşleştirin. Bu durumda raporu görüntülediğinizde hangi resim kayıtlıysa formda onları raporda görebilirsiniz. 

Örnek bir çalışma koyabilirseniz yardımcı olacak arkadaşlar daha rahat hareket ederler. Bu şekilde cevap almanız zorlaşır. 

Saygılar.

Örnek uygulama şu konuda https://accesstr.net/konu-accesste-resim...tml?page=2
10.mesajda mevcuttur

---

Güncel

Bahsi geçen konudaki 10. mesajdaki örnekte çoklu resim gösterilecek rapor yok ve formda da çoklu resim gösterilecek alan yok.

Örnek uygulamanızı talebinizi içerecek şekilde düzenleyip ekleyiniz.

Örnek Uygulama 1.mesajıma eklenmiştir.Şuan raporda 8 resim gösteriliyor ancak aynı resimler...Biz ilk 8 resim gösterilsin istiyoruz.

İlginize tşk eder,öneri ve yardımlarınızı bekliyorum.

---

GÜNCEL

---

Öneri ve yardımlarınızı bekliyor saygılar sunuyorum..

Resim denetimlerinin isimlerini RESİM0, RESİM1, RESİM2,.......RESİM7 şeklinde değiştir.

Raporda, ayrıntının biçimlendiğinde olayına aşağıdaki kodu ekle

Dim ResimSayisi, a, b As Integer



ResimSayisi = RESİM0.AttachmentCount



For a = 1 To ResimSayisi



    Controls("RESİM" & a - 1).Visible = True

    

    For b = 0 To a - 1

        Controls("RESİM" & a).Forward

    Next b



If a = 8 Then

    Exit Sub

End If



Next

Ayrıca, formun kayıt kaynağı hatalı, kayıt kaynağı TBL_KONUT olmalı ve denetim isimleri Türkçe karakter içermemeli, RESİM adında alan ve denetim adı olmamalı, RESIM olmalı. Denetim kaynağı RESIM ise, denetimin ismi rsm_RESIM. mtn_RESIM şeklinde olmalı.