strTo = Application.CurrentProject.Path & "\yedek\" & date() & "_" & Application.CurrentProject.Name
yukardaki kodda date yazan yer yerine aşağıdaki "zaman" fonksiyonunu tanımlardanız her yedeğin ömüne tarih ve zaman ekler
___________________________________________________________________________________
zaman = Format(Date, "yyyymmdd") & "_" & Format(Time, "hhmm")
strTo = Application.CurrentProject.Path & "\yedek\" & zaman & "_" & Application.CurrentProject.Name
___________________________________________________________________________________
Otomatik Yedekleme
Bu Konudaki Yorumlar |
Otomatik Yedekleme - Yazar: notrino - 02/12/2018, 17:33
Cvp: Otomatik Yedekleme - Yazar: berduş - 02/12/2018, 19:32
Cvp: Otomatik Yedekleme - Yazar: notrino - 02/12/2018, 19:52
Cvp: Otomatik Yedekleme - Yazar: berduş - 02/12/2018, 20:02
Cvp: Otomatik Yedekleme - Yazar: notrino - 02/12/2018, 21:17
Cvp: Otomatik Yedekleme - Yazar: berduş - 02/12/2018, 22:19
Cvp: Otomatik Yedekleme - Yazar: notrino - 02/12/2018, 22:26
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 13/01/2020, 00:40
Cvp: Otomatik Yedekleme - Yazar: userx - 13/01/2020, 01:24
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 14/01/2020, 00:14
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 14/01/2020, 00:18
Cvp: Otomatik Yedekleme - Yazar: userx - 14/01/2020, 00:52
Cvp: Otomatik Yedekleme - Yazar: berduş - 14/01/2020, 00:57
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 14/01/2020, 01:02
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 14/01/2020, 00:58
Cvp: Otomatik Yedekleme - Yazar: berduş - 14/01/2020, 01:09
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 14/01/2020, 01:11
Cvp: Otomatik Yedekleme - Yazar: berduş - 14/01/2020, 01:15
Cvp: Otomatik Yedekleme - Yazar: olcay.akkaya - 23/01/2020, 00:33
Cvp: Otomatik Yedekleme - Yazar: accessman - 23/01/2020, 08:30
Cvp: Otomatik Yedekleme - Yazar: berduş - 23/01/2020, 08:35
Cvp: Otomatik Yedekleme - Yazar: accessman - 23/01/2020, 11:57
|
Konuyu Okuyanlar: 2 Ziyaretçi