(28/11/2010, 21:24)okileturc yazdı: Sayın üyemizSn. okileturc
En basit resim bağlama yöntemi ekte bulacağınız
küçük örnekte görüleceği gibi otomatik bağlama
yöntemidir. Bunun için de kaydımızın "ID" sinden
faydalanıyoruz.
1. Uygulamamızın bulunduğu yere bir klasör açıyoruz ( örnekte : resimler)
2. Resimlerimizi bu klasöre kopyalıyoruz ve isimlerine ait oldukları kaydın
ID sini atıyoruz 1.BMP, 2.BMP ...... n.BMP gibi
3. Formumuzun üstüne ilşkisiz bir nesne çerçevesi ekliyoruz. ( örnekte : cerceve )
4. Formumuzun On current olayına aşağıdaki kodu yazıyoruz.
Private Sub Form_Current()
On Error GoTo yok
Forms!FRM_URUNLER!cerceve.Picture = CurrentProject.Path & "/resimler/" & Forms!FRM_URUNLER!URUN_ID & ".bmp"
Exit Sub
yok:
Forms!FRM_URUNLER!cerceve.Picture = CurrentProject.Path & "/resimler/" & "BOS.bmp"
End Sub
Ben burada hata olduğunda ( aranan resim bulunamadığında) daha önceden
hazırladığım 1pxx1px BOS.BMP dosyasını ekliyorum. Siz çift tırnak da kullanabilirsiniz.
yok:
Forms!FRM_URUNLER!cerceve.Picture = ""
Kolay gelsin
Not: Kodlar ve yöntem raporda da aynidir
Kayıt butonunda silinmesi için kod içerisindeki
sadece "yok" döngüsünün altındaki satırı yazabilirsiniz
ilginize çok teşekkür ederim. şuan müsait olmadığım için bakamayacağım ama en müsait zamanda bir iki gün içinde bakıp size dönerim. fakat söyle bir sorun var programda resim ekle/sil gibi bir şey yok. benim istediğim kişi cv ye resim ekleyecek ve o eklediği resim raporlarda görünecek.iyi geceler...