Type mismatch hatası - Baskı Önizleme

Type mismatch hatası - 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ığı: Type mismatch hatası (/konu-type-mismatch-hatasi--14206.html)

Sayfalar: 1 2 3

Type mismatch hatası - yenginoglu - 24/03/2012

Sevgili arkadaşlar
ekteki çalışmada frm_daireler formunda giriş yapıyorum ve çoklu resimleri girmek istiyorum çoklu resimde 9 adet resim var fakat resimleri kayıt ediyor ama çoklu resim gösteri tıklayınca type mismatch hatası veriyor ve sadece 1 resim görünüyor hata nerede acaba hocalarımdan nerede hata yaptığımı bulmalarını rica ediyorum.
saygılarımla
ahmet yenginoğlu

emlak_hata.rar

Cvp: Type mismatch hatası - ercansahin - 24/03/2012

Ben denedim normal çalışıyor. Hatanın fotoğrafını paylaşırmısınız?

Cvp: Type mismatch hatası - mehmetdemiral - 24/03/2012

Bende de bir sorun yok. Gayet güzel çalışıyor. Yalnızca çoklu resim ekranında seçilen bir resme çift tıklandığında olayı eksik. Onu da yapaesanız çok güzel olacak.

Bu arada Ofis 2010 kullanıyorum. Sizinki 2003 mü?

Cvp: Type mismatch hatası - ozanakkaya - 24/03/2012

bende Resim_ekle_goster formunu direkt açtığımda type mismatch hatası verdi. Hata olarak Type mismatch hatasını neden verdi anlam veremedim. Çünkü tblResimEkle tablosundaki resimler benim pcde olmadığı için hata veriyor.

Formun açıldığında olayına yazılı kodu sil, geçerli olduğunda olayındaki kodu aşağıdaki ile değiştir.

Private Sub Form_Current()

On Error Resume Next

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

        Me!ResimCercevesi.Picture = Me!MKResim

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

        Me!ResimCercevesi2.Picture = Me!MKResim2

    ElseIf Not Me!MKResim3 = "" Or Not IsNull(Me!MKResim3) Then

        Me!ResimCercevesi3.Picture = Me!MKResim3

    ElseIf Not Me!MKResim4 = "" Or Not IsNull(Me!MKResim4) Then

        Me!ResimCercevesi4.Picture = Me!MKResim4

    ElseIf Not Me!MKResim5 = "" Or Not IsNull(Me!MKResim5) Then

        Me!ResimCercevesi5.Picture = Me!MKResim5

    ElseIf Not Me!MKResim6 = "" Or Not IsNull(Me!MKResim6) Then

        Me!ResimCercevesi6.Picture = Me!MKResim6

    ElseIf Not Me!MKResim7 = "" Or Not IsNull(Me!MKResim7) Then

        Me!ResimCercevesi7.Picture = Me!MKResim7

    ElseIf Not Me!MKResim8 = "" Or Not IsNull(Me!MKResim8) Then

        Me!ResimCercevesi8.Picture = Me!MKResim8

    ElseIf Not Me!MKResim9 = "" Or Not IsNull(Me!MKResim9) Then

        Me!ResimCercevesi9.Picture = Me!MKResim9

    Else

        Me!ResimCercevesi.Picture = ""

        Me!ResimCercevesi2.Picture = ""

        Me!ResimCercevesi3.Picture = ""

        Me!ResimCercevesi4.Picture = ""

        Me!ResimCercevesi5.Picture = ""

        Me!ResimCercevesi6.Picture = ""

        Me!ResimCercevesi7.Picture = ""

        Me!ResimCercevesi8.Picture = ""

        Me!ResimCercevesi9.Picture = ""

    End If

End Sub

Cvp: Type mismatch hatası - yenginoglu - 24/03/2012

evet hocam 2003

Cvp: Type mismatch hatası - yenginoglu - 25/03/2012

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