婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > 文件夾定時自動備份 AutoBackUpFolder.vbs

文件夾定時自動備份 AutoBackUpFolder.vbs

熱門標簽:百度地圖標注怎么卸載 前鋒辦理400電話申請 外呼營銷下單系統(tǒng) 海外美發(fā)店地圖標注 新密防封卡外呼系統(tǒng)違法嗎 陜西高頻外呼回撥系統(tǒng)哪家好 辦理膠州400電話財稅 打電話的外呼系統(tǒng)貴不貴 加盟電銷機器人好的品牌
復制代碼 代碼如下:

'/*=========================================================================
' * Intro 定時自動備份文件夾到一個以時間命名的新目錄,設置好后加到啟動項里,只要一啟動機器程序就會自動運行,占系統(tǒng)資源可以不計
' * FileName AutoBackUpFolder.VBS
' * Author yongfa365
' * Version v1.0
' * Email yongfa365[at]qq.com
' * MadeTime 2009-05-14 17:18:33
' * LastModify 2009-05-14 17:18:33
' *==========================================================================*/
Do While 1
Run()
' WScript.Sleep 1000*60*60*2
WScript.Sleep 1000 * 5 '測試用,每5秒備份一次文件到指定的文件夾
Loop
Function Run()
BackUpFolder "D:\公司所有正在設計的系統(tǒng)", "E:\軟件自動備份"
End Function
Function BackUpFolder(S, D)
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
FSO.CreateFolder D
FSO.CopyFolder S, D "\" GetDateFolder
End Function
Function GetDateFolder()
GetDateFolder = Year(Now) "-" Right("0" Month(Now), 2) "-" Right("0" Day(Now), 2) "-" Right("0" Hour(Now), 2) "-" Right("0" Minute(Now), 2) "-" Right("0" Second(Now), 2)
End Function

標簽:河南 阜陽 牡丹江 咸陽 四平 伊春 梅州 武威

巨人網(wǎng)絡通訊聲明:本文標題《文件夾定時自動備份 AutoBackUpFolder.vbs》,本文關(guān)鍵詞  文件夾,定時,自動,備份,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡,涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《文件夾定時自動備份 AutoBackUpFolder.vbs》相關(guān)的同類信息!
  • 本頁收集關(guān)于文件夾定時自動備份 AutoBackUpFolder.vbs的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章
    主站蜘蛛池模板: 竹溪县| 赣州市| 鹤壁市| 延津县| 上杭县| 永新县| 金门县| 宝鸡市| 巴东县| 宁波市| 同江市| 错那县| 台北县| 罗田县| 年辖:市辖区| 韩城市| 府谷县| 磴口县| 保亭| 海南省| 尉氏县| 南郑县| 循化| 长顺县| 吴忠市| 新营市| 花莲县| 遂宁市| 凌云县| 北碚区| 宁蒗| 旺苍县| 霍城县| 襄垣县| 中西区| 若尔盖县| 阿尔山市| 田东县| 新平| 庆云县| 永靖县|