Type mismatch hatası

arkadaşlar resim ekleme penceresinde resimdeki gibi sadece Datebase file arıyor jpeg niye çıkmıyor acaba.

basopenfile modülünüzde bulunan

strFilter = CreateFilterString_CLT("All Files (*.*)", "*.*", "Database Files (*.MDB)", "*.MDB")

kısmını

strFilter = CreateFilterString_CLT("All Files (*.*)", "*.*", "Resim Dosyaları (*.JPG)", "*.JP*")

olarak değiştirirseniz JPG resimleri getirir.
Kolay Gelsin.

(25/03/2012, 00:23)yenginoglu yazdı: sayın hocalarım
resimleri kayıt ettiği halde tekrar açtığında ilk resim hariç diğerleri görünmüyorda
neden olabilir acaba.
saygılarımla

Kodu aşağıdaki gibi deneyiniz

If Not Me!MKResim = "" Or Not IsNull(Me!MKResim) Then

        Me!ResimCercevesi.Picture = Me!MKResim

end if

If Not Me!MKResim2 = "" Or Not IsNull(Me!MKResim2) Then

        Me!ResimCercevesi2.Picture = Me!MKResim2

end if

(25/03/2012, 01:01)yenginoglu yazdı: arkadaşlar resim ekleme penceresinde resimdeki gibi sadece Datebase file arıyor jpeg niye çıkmıyor acaba.

BasOpenFile modülündeki "GetOpenFile_CLT" fonksiyonunda

  strFilter = CreateFilterString_CLT("All Files (*.*)", "*.*", "Database Files (*.MDB)", "*.MDB")

şeklinde tanımlanmış

---

Pardon Ercan hocam,

Sayın hocalarım ilgileriniz için çok teşekkür ederim. Çözüldü..
Saygılarımla

Sayın yenginoglu,

Günaydın ve iyi pazarlar. Üstadlarımın kodlarını ekledim, hep "compile" hatası aldım.
Mutlaka bir yerde hata yapıyorum.

Rica etsem, dosyanızın son şeklini ekleyebilir misiniz?

Size ve katkı veren üstadlarımın emekleri için içten teşekkürler.

Sevgi ve saygılar.

Sayın assenucler ekliyorum.