(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
| Bu Konudaki Yorumlar |
|
Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - Yazar: uMits - 05/05/2017, 16:24
Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - Yazar: atoz112 - 05/05/2017, 16:26
Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - Yazar: uMits - 05/05/2017, 16:39
Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - Yazar: ozanakkaya - 19/05/2017, 07:10
Cvp: Vt Yedekleme Ve Bakım Uygulaması V3 Uygulamasını Oto Yedek Almamasını Ayarlamak - Yazar: uMits - 19/05/2017, 10:27
|
