AccessTr.neT

Daha Önceden bu konuda bir örnek yine siteden almıştım. Ancak kullanım değişikli olması sebebiyle Ekte gönderdiğim Formlardan 1' den 2'ye, 2' den 3'e geçerek Resim Getir butonuna tıklandığında; Access dosyamın bulunduğu klasörde bulunan ilgili resimleri getirmektedir.

1. Olarak Bu resimlerin Farklı bir klasörden gelmesini istediğim için Vba' da değişiklik yapmam gerekiyordu ancak yapamadım. Örneğin; 
  "C:\Users\MY-PC\Desktop\Resim Projesi" klasöründen direkt çeksin.

2. Olarak ise 3. form olan 3ssctcde... şeklinde isimli form açıldığında herhangi bir tane resim oraya otomatik gelmektedir. Aslında form' un yüklenme olayına "RESİM GETİR" butonunun çalıştır dedim ve msgbox' ı kaldırdım. Ancak DoCmd.RunCommand koduyla sanırsam olmuyormuş. O kısmın açılışta boş olması için ne yapabilirim.

Sorularım bunlar. Yardımlar için teşekkür ederim.

Dosya yolunu xYol = Application.CurrentProject.Path & "\" & Me.arama & ".JPG" kodu aracılığıyla alıyor
Buradaki Application.CurrentProject.Path projenin bulunduğu dizini gösterir
O kısmı xYol ="C:\Users\MY-PC\Desktop\Resim Projesi" & "\" & Me.arama & ".JPG" olarak değiştirip dener misiniz?

Hocam çalıştı. Çok' da güzel getirdi. Aslında ben bu kodu yazdım Vba üzerindeyken. Ancak o esnada kırmızı göründüğü için kapatıp, kaydedip denemedim. Çünkü hata verdiğini düşündüm. Ancak kırmızı renge aldanmamam gerektiğini burda da öğrendim.

2. Soruda yazdığım cevabı da buldum. Resim' e belli bir fotoğraf yüklediğimden her açılışta ilk onu açıyormuş. Hatamı düzelttim. Sorunum çözüldü. Çok teşekkür ediyorum İyi Çalışmalar Dilerim.

Rica ederim
İyi çalışmalar