ÉèΪÊ×Ò³ ¼ÓÈëÊÕ²Ø

TOP

SqlServer×Ô¶¯±¸·Ý¡¢×Ô¶¯Ñ¹Ëõ¡¢×Ô¶¯É¾³ý¾É±¸·Ý
2015-11-21 01:51:56 À´Ô´: ×÷Õß: ¡¾´ó ÖРС¡¿ ä¯ÀÀ:0´Î
Tags£ºSqlServer ×Ô¶¯ ±¸·Ý ѹËõ ɾ³ý

×¼±¸¹¤¾ß£º
SqlServer2008
WinRar

1.¸øSqlServerÉèÖÃά»¤¼Æ»®¶¨Ê±±¸·Ý
Õâ¸ö²Ù×÷±È½Ï¼òµ¥£¬°´Ïòµ¼ÐÂÔöά»¤¼Æ»®¼´¿É¡£
ÕâÀïдͼƬÃèÊö

2.×Ô¶¯Ñ¹Ëõ½Å±¾

c:\Progra~2\WinRar\winRar.exe a D:\bak\database_buckup_%date:~0,4%_%date:~5,2%_%date:~8,2% d:\bak\database_*%date:~0,4%_%date:~5,2%_%date:~8,2%_*.bak 

±¸·ÝÎļþµÄ¸ñʽÊÇ£ºdatabase_backup_2015_05_15_010001_5555338.bak£¬
ѹËõÎļþ¸ñʽÊÇ£ºdata_2015_06_15.rarÕâÖÖÑùʽ¡£

3.×Ô¶¯É¾³ý¾ÉµÄ±¸·Ý
ÉèÖÃÒ»¸ö¼Æ»®ÈÎÎñ£¬ÔÚѹËõǰ°ÑÀϵı¸·Ýɾ³ý¡£ÕâÀïͨ¹ýbat½Å±¾µ÷ÓÃvbs½Å±¾£¬ÒòΪvbs½Å±¾Ïà¶ÔºÃдһµã¡£

autoDeleteOld.bat

cscript d:/bak/autoDeleteOldBak.vbs

autoDeleteOldBak.vbs

const reMainCount = 1           '±£Áô¼¸day

Dim fso,dc,file,files,folder,subfolders,subfolder
set fso=createobject("Scripting.FileSystemObject")
set folder=fso.getfolder("D:\bak")
Dim today
today=Now
for each tempFile in folder.files
    dim arr
    arr=Split( tempFile,"_backup_")
    if UBound(arr)>0 then
        dim tempDate,diff
        tempDate=Cdate( Replace( Left(arr(1),10),"_","-"))
        diff= DateDiff("d",tempDate,today)
        if (diff>reMainCount) then
            fso.deleteFile(tempFile),true
        end if
    end if
next
set fso=nothing

Èç¹ûÁíÍâÓÐftp·þÎñÆ÷£¬¿ÉÒÔѹËõÎļþºó£¬Ô¶³Ìͬ²½µ½Áíһ̨·þÎñÆ÷ÉÏ¡£

¡¾´ó ÖРС¡¿¡¾´òÓ¡¡¿ ¡¾·±Ìå¡¿¡¾Í¶¸å¡¿¡¾Êղء¿ ¡¾ÍƼö¡¿¡¾¾Ù±¨¡¿¡¾ÆÀÂÛ¡¿ ¡¾¹Ø±Õ¡¿ ¡¾·µ»Ø¶¥²¿¡¿
·ÖÏíµ½: 
ÉÏһƪ£ºSQLÊý¾Ý¿âµÄÉý¼¶¹ý³Ì¨D½â¾öWMI·þÎ.. ÏÂһƪ£ºOracle»ù´¡£¨ËÄ£©£ºµ¥±í²éѯ

ÆÀÂÛ

ÕÊ¡¡¡¡ºÅ: ÃÜÂë: (ÐÂÓû§×¢²á)
Ñé Ö¤ Âë:
±í¡¡¡¡Çé:
ÄÚ¡¡¡¡ÈÝ: