Vbs備份指定文件到指定目錄并且以日期重命名的實(shí)現(xiàn)代碼怎么寫

本篇文章給大家分享的是有關(guān)Vbs備份指定文件到指定目錄并且以日期重命名的實(shí)現(xiàn)代碼怎么寫，小編覺得挺實(shí)用的，因此分享給大家學(xué)習(xí)，希望大家閱讀完這篇文章后可以有所收獲，話不多說，跟著小編一起來看看吧。

說到備份，相信大家都會(huì)想到的第一個(gè)方法就是通過windows系統(tǒng)自帶的window backup功能進(jìn)行數(shù)據(jù)備份。后來微軟又出了system centere產(chǎn)品后，就出現(xiàn)了一個(gè)新的備份產(chǎn)品---system centere data backup manager（DPM）。這些功能備份比較大的數(shù)據(jù)還可以，但是對(duì)于小文件的備份有點(diǎn)浪費(fèi)了，因?yàn)橛械臅r(shí)候由于工作需要備份幾個(gè)重要的文件(配置文件)，不需要全備，所以說呢，很多備份軟件有點(diǎn)浪費(fèi)，對(duì)于小文件的備份來說不是非常方便。以上僅僅是個(gè)人的想法。我算是一個(gè)比較愛挑剔的人，能用簡單的方法實(shí)現(xiàn)的工作絕對(duì)不會(huì)搞太復(fù)雜。

公司使用的是ibm lotus產(chǎn)品做為郵件系統(tǒng)。我們大家都知道，lotus郵件產(chǎn)品數(shù)據(jù)庫都是獨(dú)立的文件數(shù)據(jù)庫，都是以.nsf結(jié)尾的。還有就是一個(gè).ntf的數(shù)據(jù)庫模板。服務(wù)定時(shí)通過對(duì)應(yīng)的.ntf模板文件對(duì).nsf數(shù)據(jù)庫進(jìn)行設(shè)計(jì)刷新。在此先不說這么多了。我們主要還是說一下遇到的問題吧~上周同事發(fā)現(xiàn)之前刪除的一些domino服務(wù)器配置怎么又恢復(fù)了。當(dāng)然我沒有無聊的去做一些還原。然后就通過近期的數(shù)據(jù)備份進(jìn)行對(duì)比，然后再次刪除，領(lǐng)導(dǎo)了跟我說，讓我定期備份lotus的配置數(shù)據(jù)庫。所以就想通過vbs程序來備份。我們都知道，domino服務(wù)器配置數(shù)據(jù)庫為names.nsf。只要對(duì)names.nsf數(shù)據(jù)庫進(jìn)行備份的話，domino服務(wù)器的配置是不會(huì)丟的。出了問題覆蓋恢復(fù)就行，還有就是一個(gè)，備份一次一定保留之前的備份的歷史記錄，通過本地的備份日期及時(shí)間來重命名，對(duì)此問題的解決方法見下：

代碼：

sourcefilepath="c:\names\names.nsf"desfilepath="d:\name_backup\Name"&""&Year(date)&-Month(date)&-Day(date)&" "&Hour(time)&-Minute(time)&"\"Set fso=CreateObject("Scripting.FileSystemObject")If Not fso.FolderExists(desfilepath) Thenfso.CreateFolder desfilepathfso.copyfile sourcefilepath,desfilepathEnd If

模擬將c盤下的names文件夾下的names.nsf拷貝到目的目錄

將c盤下的names.nsf文件拷貝到d盤下的目的路徑

執(zhí)行一次在該文件夾下新建一個(gè)文件夾，然后將拷貝的文件存入該文件。然后以日期命名

文件存入

每天執(zhí)行一次，執(zhí)行一次就在該文件夾下新建一個(gè)文件夾，然后以日期命名

然后通過系統(tǒng)自帶的計(jì)劃任務(wù)進(jìn)行程序運(yùn)行： taskschd.msc

打開計(jì)劃任務(wù)后，我們創(chuàng)建任務(wù)

定義計(jì)劃任務(wù)命名：及運(yùn)行方式：不管用戶是否登陸都要運(yùn)行

程序運(yùn)行計(jì)劃，每天23.54執(zhí)行一次。勾選---已啟用選項(xiàng)

計(jì)劃任務(wù)已創(chuàng)建完成

創(chuàng)建任務(wù)操作。---啟動(dòng)程序---然后我們選擇定義好的腳本文件

定義計(jì)劃操作完成

我們右擊開始運(yùn)行一次。進(jìn)行測(cè)試。

執(zhí)行效果，第二天的指定時(shí)間再次運(yùn)行

以上就是Vbs備份指定文件到指定目錄并且以日期重命名的實(shí)現(xiàn)代碼怎么寫，小編相信有部分知識(shí)點(diǎn)可能是我們?nèi)粘９ぷ鲿?huì)見到或用到的。希望你能通過這篇文章學(xué)到更多知識(shí)。更多詳情敬請(qǐng)關(guān)注億速云行業(yè)資訊頻道。