AccessTr.neT

Tam Versiyon: Access Tablosuna Resim Ekleme
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Merhaba,
Ekli Access Tablosuna resimlerin yolunu kaydedip, forumda hangi Ürün seçilirse onun görselinin gelmesini nasıl sağlayabiliriz?


veritabanı taşınınca resimleirn kaybolmaması nasıl bir yol izlemek gerekir?

teşekkürler,
iyi Çalışmalar.
(06/07/2023, 14:32)truhi yazdı: [ -> ]veritabanı taşınınca resimleirn kaybolmaması nasıl bir yol izlemek gerekir?
tam olarak anlamadım eğer Access dosyanız ile resimlerin olduğu klasör aynı dizinde ve taşıma esnasında bu resimler yine Access dosyanızla aynı dizinde olmaya devam edecekse çok sorun çıkmaz. ama "taşınmak"tan kastınız ne? önemli olan o
(06/07/2023, 15:12)berduş yazdı: [ -> ]
(06/07/2023, 14:32)truhi yazdı: [ -> ]veritabanı taşınınca resimleirn kaybolmaması nasıl bir yol izlemek gerekir?
tam olarak anlamadım eğer Access dosyanız ile resimlerin olduğu klasör aynı dizinde ve taşıma esnasında bu resimler yine Access dosyanızla aynı dizinde olmaya devam edecekse çok sorun çıkmaz. ama "taşınmak"tan kastınız ne? önemli olan o

Hocam resimleri klasör içinde tutmaktan başka bir çözüm yok sanırım,
sanırsam resimler Excel de olduğu gibi tablo içine alınamıyor.
database ile aynı klasör içinde "Foto" klasörü altında bulunduğu zaman; tabloda bunu nasıl belirtmemiz gerekiyor?

teşekkürler,

iyi çalışamalar.
çok önerilmese de Access tablolarına da resim eklenebilir onda sorun yok.
tablodaki hangi alana göre resim adı alınacak?
resimlerin hepsi .bmp formatında mı olacak
aşağıdaki kod işinize yarayabilir ama önce açılır kutunun - Açılan_Kutu0-ın sorgu kaynağına resim alanını da eklemelisiniz
yani açılır kutunun sorgu kaynağının kodunu aşağıdaki kodla değiştirmelisiniz
1 - açılır kutu/Açılan_Kutu0 sorgu kodu
SELECT Tablo1.Kimlik, Tablo1.Adi, Tablo1.Resim FROM Tablo1 ORDER BY Tablo1.[Adi]; 
2 - Açılan_Kutu0 değiştiğinde olayı
Private Sub Açılan_Kutu0_Change()
xAdres = CurrentProject.Path & "\Foto\" & Açılan_Kutu0.Column(2)
If Dir(xAdres & "") <> "" Then Me.Resim2.Picture = xAdres
End Sub
not : foto klasörü her zaman Access dosyanızla aynı dizinde olmalı
(06/07/2023, 15:39)berduş yazdı: [ -> ]çok önerilmese de Access tablolarına da resim eklenebilir onda sorun yok.
tablodaki hangi alana göre resim adı alınacak?
resimlerin hepsi .bmp formatında mı olacak
aşağıdaki kod işinize yarayabilir ama önce açılır kutunun - Açılan_Kutu0-ın sorgu kaynağına  resim alanını da eklemelisiniz
yani açılır kutunun sorgu kaynağının kodunu aşağıdaki kodla değiştirmelisiniz
1 - açılır kutu/Açılan_Kutu0 sorgu kodu
SELECT Tablo1.Kimlik, Tablo1.Adi, Tablo1.Resim FROM Tablo1 ORDER BY Tablo1.[Adi]; 
2 - Açılan_Kutu0 değiştiğinde olayı
Private Sub Açılan_Kutu0_Change()
xAdres = CurrentProject.Path & "\Foto\" & Açılan_Kutu0.Column(2)
If Dir(xAdres & "") <> "" Then Me.Resim2.Picture = xAdres
End Sub
not : foto klasörü her zaman Access dosyanızla aynı dizinde olmalı

Çok teşekkürler
resim adı, tablodaki "resim" alanına alınacak
resimler "jpg" formatında da olabilir.
rica ederim)
sorun çözüldüyse çözülmüşlere taşıyalım?