AccessTr.neT
Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - 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ığı: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak (/konu-vt-yedekleme-ve-bakim-uygulamasi-v3-uygulamasini-oto-yedek-almamasini-ayarlamak.html)



Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - uMits - 05/05/2017

merhabalar 

ben Veritabanı Yedekleme ve Bakım Uygulaması V3  bu uygulamayı kullanıyorum çalışmama ekledim. kendim el ile programı onarım yapıp yedeğini alıyorum gayet güzel çalışıyor istediğim gibi ...

yedek alma ayarlarında otomatik bölümünü 7 gün sonra yedek alınsınmı diye onayladım ama 7 gün geçince bana haber vermiyor 7 gündür yedek almadınız diye bunun için başlangıç ana forma birşey eklemem gerekiyor muydu bilgi verirmisiniz teşekkürler


Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - atoz112 - 05/05/2017

sayın uMits,

mevcut olduğunu beyan ettiğiniz örnek uygulamanızı konunuza dahil ediniz lütfen.

bilginize...iyi çalışmalar,saygılar.


Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - uMits - 05/05/2017

hocam örnek ektedir ana sayfa formum açıldığında yedek ve bakım butonu var manuel olarak oradan yapıyorum . 
ben form açıldığında yedekleme ve bakım uygulaması v3 de ayarlama bölümünde 7 gün de bir otomatikl yedek var otomatik yedek almıyor. ben 7 günde bir bana 7 gün yedek alınmamıştır yedek alınız diye kendi uyarı yapsın istiyorum.  acaba programın otomatik yedek alması çalışmıyormu

teşekkür ederim şimdiden


Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - ozanakkaya - 19/05/2017

Merhaba, 
Uygulamada, yedekleme ayarı kısmındaki gün olayı hatırlatma için. Alınan son yedekten itibaren belirlenen gün sonrasında yedek alınmamış ise uyarır ancak otomatik yedekleme yapmaz.

Otomatik yedekleme işlemi, BEKLEME isimli form açıkken yapar. Bekleme isimli formu kapatırsanız otomatik yedekleme yapmaz.

Belirlenen süre geçmesine rağmen yedekleme yapılmamış ise uyarı vermesi ve yedekleme yapması için,

anasayfa isimli formun açıldığında olayına aşağıdaki kodu ekle,

Dim YedekGunAyar As Integer

YedekGunAyar = Dlookup ("YedekGun", "YEDEKZAMAN")

If YedekGunAyar < (Date - DLast("[TARİH]", "YEDEKGEÇMİŞ")) Then

   If MsgBox("Yedekleme Ayarınız " & YedekGunAyar & " Gün Olarak Ayarlanmış, Ancak " & (Date - DLast("[TARİH]", "YEDEKGEÇMİŞ")) & " Gündür Yedek Alınmıyor. Veritabanınızın yedeği alınsın mı?", vbCritical + vbYesNo) = vbYes Then
       DoCmd.OpenForm "YEDEKALINIYOR"
   End If
   
End If



Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - uMits - 19/05/2017

(19/05/2017, 07:10)ozanakkaya yazdı: Dim YedekGunAyar As IntegerYedekGunAyar = Dlookup ("YedekGun", "YEDEKZAMAN")If YedekGunAyar < (Date - DLast("[TARİH]", "YEDEKGEÇMİŞ")) Then    If MsgBox("Yedekleme Ayarınız " & YedekGunAyar & " Gün Olarak Ayarlanmış, Ancak " & (Date - DLast("[TARİH]", "YEDEKGEÇMİŞ")) & " Gündür Yedek Alınmıyor. Veritabanınızın yedeği alınsın mı?", vbCritical + vbYesNo) = vbYes Then        DoCmd.OpenForm "YEDEKALINIYOR"    End If    
End If

teşekkür ederim