Resim Yolu Bulunamadı Hatası

1 2 3
10/04/2011, 10:28

alpeki99

Eklemiş olduğunuz dosyada SURUCUKAYIT isimli formunuzu tasarım modunda açın. Form özelliklerinden Açıldığında ve Geçerli Olduğunda isimli olaylarda yer alan kodlarınızı inceleyin. Aşağıda örnek olarak verdiğim Geçerli Olduğunda olayının kodları yer almaktadır:


Private Sub Form_Current()
On Error GoTo err_Form_Current

If Not Me!MKResim = "" Or Not IsNull(Me!MKResim) Then
Me!ResimCercevesi.Picture = Me!MKResim
Else
Me!ResimCercevesi.Picture = ""
End If

exit_Form_Current:
Exit Sub

err_Form_Current:
'MsgBox Err.Description
Resume exit_Form_Current
End Sub

Alttan üçüncü satırda yer alan

MsgBox Err.Description

komutunun önüne tek tırnak yani ' işaretini koyarsanız hata mesajını almazsınız. Yukarıda zaten diğer üstadlarımız aynısını yazmış ama bende bir daha yazma ihtiyacı hissettim.
10/04/2011, 13:02

down73

SN; Alpeki hocam sizin önerinizi uyguladım ve istedigim oldu ben sadace açıldığında bölümünü degiştiriyordum, geçerli olduğundaki koduda değiştirince düzeldi size ve yol gösteren diger üstadlara çok teşekkür ediyorum.saygılar.
1 2 3