Skip to main content

AccessTr.neT


Kullanıcıya ait resim ekleme

Kullanıcıya ait resim ekleme

#7
ilgili formun açıldığında olayındaki kodları aşağıdaki ile değiştirerek deneyiniz.


  SpeedEffect = 80

 'SetFormIcon "Logo.ico", Me.Name, Me.hwnd
 BoxGénéraleSize = Me!boxGénérale.Height
 BoxResultSize = Me!boxResult.Height
 BoxDétail = Me!boxDétails.Height
 
cmdDétails_Click
cmdResult_Click
cmdGénérale_Click
Me.TimerInterval = 800



Dim ResimYolu As String
Dim ResimDir As Variant
ResimYolu = Nz(DLookup("[resim]", "PERSONEL", "[SICILI]=" & PersonelSicili), "")
ResimDir = Dir(CurrentProject.Path & "\resim\" & ResimYolu)

If IsNull(ResimDir) Or ResimDir = "" Then
[Sub].Form![Resim12].Picture = CurrentProject.Path & "\resim\resimyok.jpg"
Else
[Sub].Form![Resim12].Picture = CurrentProject.Path & "\resim\" & ResimYolu
End If
Cevapla
#8
hocam vermiş olduğunuz kodu 4.mesajda ki örnek uygulama üzerinde denedim fakat çalışmadı. birde ben personel tablosunda yer alan  resim metin kutusuna resim klasöründe yer alan resimlerin yolunu kaydettiriyorum. sormak istediğim personel bilgileri formunda ilgili personele ait resim eklediğim zaman bu vermiş olduğunuz kodlarda sıkıntı olmaz dimi? 
Cevapla
#9
(14/12/2014, 23:47)polak_68 yazdı: sormak istediğim personel bilgileri formunda ilgili personele ait resim eklediğim zaman bu vermiş olduğunuz kodlarda sıkıntı olmaz dimi?

ben boş yere uygulama boyutu artmaması için tablodaki ilgili yere sadece resim adını kaydettim, resim yolunu currentproject.path kodu ile tamamladım.

Kodu kendi uygulamanızda da aynı şekilde uygulamanızı tavsiye ediyorum. 

Uygulamanın düzenlenmiş hali ektedir.
.rar resim_goster_sld2.rar (Dosya Boyutu: 1,73 MB | İndirme Sayısı: 57)
Cevapla
#10
sayın polak_68,

konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.bilgilendirmek ister misiniz lütfen.teşekkürler.bilginize.

iyi çalışmalar,
saygılar.
Herkes, kendisinin AR-GE'cisidir...


Konulara eklenen Uygulama içeriğine yönelik Tavsiyeler
Alt Form Denetim Değerlerine ulaşma ve Alt Form Güncelleme
Kapatırken Düzenle (Compact On Close) Seçeneğinin İşaretlenmesi Hakkında
Cevapla
#11
Hocam kusura bakmayın cevap yazmayı unutmuşum. Sn ozanakkaya Hocamın vermiş olduğu kod ile sorun cozuldu
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da