Merhaba arkadaşlar,
yapmış oldugum bir tabloda ürünlere göre resim ekleme yapıyorum. programım çalıştıgı klasörde "resim" klasörün içinde sorunsuz çalışıyor. yanlız ben burdaki resimleri \\server\resim\ içinde saklamak istiyorum.
ekle çalışma lütfen yardım ediniz
Const Sunucu As String = " \\server\resim"
ilgili sunucu uzerinde ki klasoru tanmlamak icin VBA da en ust sairin bir altina tasiyin.
Private Sub Form_Current()
On Error GoTo hata
If Nz(resim, "") = "" Then _
...
...
end sub
ile
Function ResimEkle(alanadi As String, cerceveadi As String)
....
.InitialFileName = Sunucu & "\"
....
end sub
prosedurlerini degistirin.
Sunucuya konan resimlerin guvenligi icin(Biyik yapma, silme, ters cevirme, vb..) olaydan etkilenmemesi icin sunucuda ki resim klasorunun guvenlik ayarlarindan Kullanicilara okuma-yazma yetkisi disinda ki yetkileri tumunu kaldirin. Kendi kullaniciID'nize TAM yetki ayarlari olmasina DIKKAT edin.
