AccessTr.neT

Merhaba.

Bir Access dosyasını örneğin googledrive yada dropbox taki dosyayla nasıl güncellenir.

Yani Accessteki butona tıklayınca yeni versiyon varsa o dosyanın o dosyayı indirecek ilgili yerden.

Düzenleme çözüm için.

Dosyalar linkte.DropBox ve Google Drive için farklı yöntem kullanılmıştır.
Sebebi Google Drive deki txt okunamadığı için.

Ozan hocamızın çözüm dosyası 52.Mesajdadır bu foruma kaydedilen dosyalar ile yapılmış örnek olarak.[attachment=31688]

Ekli uygulamadaki form açıldığında yeni versiyonu kontrol edilir.
https://accesstr.net/sitegenel/guncelleme/progver.txt

Yeni versiyon var ise ve indirme işlemini onaylarsanız web dizininden guncelle.mdb ve guncel_yakıthesapla.mdb isimli dosyaları indirir. Uygulama kapanır ve guncelle.mdb isimli uygulama açılır. Güncelle butonuna tıkladığınızda eski sürümü eskisurum klasoröne tarih ekleyerek gönderir, yeni sürümün ismini değiştirerek eski sürüm ile yeni sürümü değiştirir. Yeni sürümü açar.

Ozan hocam sağolunuz.Denedim güzel çalışıyor.Dropbox yada Googledriver olarak nasıl ayarlanır?
Ayrıca dosya açılınca 64bit için hata veriyordu ptrsafe ekledim alttaki gibi.İlgilenen olursa diye yazdım.

#If VBA7 Then

Private Declare PtrSafe Function URLDownloadToFile Lib "urlmon" _
Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, _
ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long

Kod içerisindeki indirme linklerini değiştirmelisin. Google drive indirme linki ile değiştir.

(03/03/2020, 21:39)ozanakkaya yazdı: [ -> ]Kod içerisindeki indirme linklerini değiştirmelisin. Google drive indirme linki ile değiştir.

Tamam sağolunuz.Yarın bir deneyeceğim nasip olursa.

Ben Dropbox kullanıyyorum.
Alttaki yere kaydettim text  i ve kodu uyarlayamadım.


https://www.dropbox.com/s/lznm3dke1uy9lj...n.txt?dl=0