Vbs備份指定文件到指定目錄并且以日期重命名的實現代碼怎么寫

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

說到備份，相信大家都會想到的第一個方法就是通過windows系統自帶的window backup功能進行數據備份。后來微軟又出了system centere產品后，就出現了一個新的備份產品---system centere data backup manager（DPM）。這些功能備份比較大的數據還可以，但是對于小文件的備份有點浪費了，因為有的時候由于工作需要備份幾個重要的文件(配置文件)，不需要全備，所以說呢，很多備份軟件有點浪費，對于小文件的備份來說不是非常方便。以上僅僅是個人的想法。我算是一個比較愛挑剔的人，能用簡單的方法實現的工作絕對不會搞太復雜。

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

代碼：

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盤下的目的路徑

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

文件存入

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

然后通過系統自帶的計劃任務進行程序運行： taskschd.msc

打開計劃任務后，我們創建任務

定義計劃任務命名：及運行方式：不管用戶是否登陸都要運行

程序運行計劃，每天23.54執行一次。勾選---已啟用選項

計劃任務已創建完成

創建任務操作。---啟動程序---然后我們選擇定義好的腳本文件

定義計劃操作完成

我們右擊開始運行一次。進行測試。

執行效果，第二天的指定時間再次運行

以上就是Vbs備份指定文件到指定目錄并且以日期重命名的實現代碼怎么寫，小編相信有部分知識點可能是我們日常工作會見到或用到的。希望你能通過這篇文章學到更多知識。更多詳情敬請關注億速云行業資訊頻道。