RAR şeklinde yedekleme - Baskı Önizleme +- AccessTr.neT (https://accesstr.net) +-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html) +--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html) +--- Konu Başlığı: RAR şeklinde yedekleme (/konu-rar-seklinde-yedekleme.html) |
Cvp: RAR şeklinde yedekleme - mehmetdemiral - 18/02/2011 (18/02/2011, 17:56)Yandemir yazdı: sana tavsiyem gizli bir Access programı yap onu çalıştır. devamlı açık kalsın içerisindeki timer ile saat kontrolu yap saati geldiğinde bu iki dosyayı yedeklesin sorgu sual olmadan. rar parametresine de database olayını ekle açık dahi olsa alır yedeğini. bat dosyası kullanmana gerek kalmaz. shell komutunu accessten çalıştırırsın. Bu durumda da Access hataya düşebilir. Çünkü görev yöneticisinde sürekli açık olarak çalışacak. Bazen aynı anda bir başka Access dosyası çalıştırmak istediğinde bir tane çalıştığı ve gizlenmiş olduğu için yine gizli olan bir access.exe çalışır. Belki runtime parametresi ile çalıştırılırsa sorun olmaz sanıyorum. Ama emin değilim. Benim daha iyi bir önerim var. Yaptığın bat dosyasının çalışmasını görev zamanlıyıcıya yaptır. Görev zamanlıyıcıda meşgul olduğu zaman pas geçme özelliği de olması lazım. Onu kullan. Böylece görev zamanlayıcı sağ altta çalışır ve zamanı geldiğinde bat dosyasına start eder. Cvp: RAR şeklinde yedekleme - Yandemir - 18/02/2011 en uygunu görev zamanlıyıcı bencede daha rahat edersin. Cvp: RAR şeklinde yedekleme - accessman - 18/02/2011 çok teşekkürler ama benim bu dediklerinizi yapabilecek kadar bilgiye sahip değilim eklediğim örnekte bunu yaparsanız çok memnun kalacağım her iki dosyayı bir rar dosyası içnde ismde tarih bilgiside olacak şekilde yedeklerse çok güzel olur teşekkürler Cvp: RAR şeklinde yedekleme - ogulcan92 - 18/02/2011 Sn:accessman Aşağıdaki konuda vb6 ile yapılmış hali var ve kullanımı ile ilgili açıklamalar mevcut. Winrar ile veri tabanı sıkıştırma ve açma Cvp: RAR şeklinde yedekleme - Yandemir - 19/02/2011 Shell komutu ve WinRAR kullanımı Private Sub Form_Timer() Me.Zaman = Time Me.Tarih = Date Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("Yedekler") rs.MoveFirst DoEvents Do Until rs.EOF If rs.Fields("YedekSaati") = Me.Zaman Then X = Shell("C:\Program Files\WinRAR\winrar.exe" & " a -inul -isnd -ilogc:\YedHata.log -y -x*.mp3 -x*.avi -x*.mpg -s -v720m -vn -ibck -dh -r -ag-YYYYMM " & rs.Fields("SaklanacakYer") & "\" & rs.Fields("YedekAdi") & Format(Date, "ddd") & " " & rs.Fields("YedekYeri") & "\*.*") End If rs.MoveNext Loop rs.Close End Sub Cvp: RAR şeklinde yedekleme - accessman - 19/02/2011 çok teşekkürler arkadaşlar en kısa zamanda deneyeceğim |