SQL2000自动备份 压缩 删除(备份文件)

create proc dbbf_test as declare @dbname varchar(20), @cmd1 nvarchar(120), @cmd2 varchar(120), @cmd3 varchar(120), @i int, @filename varchar(80), @path varchar(80) set @dbname='TEST'--\\这是数据库名，使用时只需要把它改成你所要备份的数据库名即可，这个必须修改\\-- ----删除当前日期前15-前10天内的数据库备份,可根需要自行修改----

set @i=10 while @i<15 begin  set @cmd1  ='if exist E:\DATABACKUP\'+@dbname+convert(varchar(10),DATEADD(day,-@i,getdate()),112) +'*' +' del  '+'E:\DATABACKUP\'+@dbname+convert(varchar(10),DATEADD(day,-@i,getdate()),112) +'*' exec master..xp_cmdshell @cmd1----删除10天之前的数据库备份    set @i=@i+1 end ----备份数据库----

exec master..xp_cmdshell 'if not exist E:\DATABACKUP (md E:\DATABACKUP)'--如果E盘根目录没有DATABACKUP文件夹，则新建此文件夹 SELECT @filename=@dbname+replace(replace(replace(CONVERT(varchar(16), getdate(), 120 ),'-',''),' ','-'),':','')  SET @path='E:\DATABACKUP\'+@filename BACKUP DATABASE @dbname TO DISK=@path

----压缩数据库备份，删除原备份文件

set @cmd2='C:\PROGRA~1\WinRAR\winrar.exe a  -ibck E:\DATABACKUP\'+@filename+'.rar E:\DATABACKUP\'+@filename exec master..xp_cmdshell @cmd2----压缩数据库 set @cmd3='DEL E:\DATABACKUP\'+@filename exec master..xp_cmdshell @cmd3----删除原备份文件（只保留压缩包）

go

--1.修改本过程中目标数据库名成你要备分的数据库名 2.复制此行(可含此行)以上内空到查询分析器中执行即可 --3.数据库备份文件存放在E:\DATABACKUP文件夹中，文件名为 数据库名四位年两位月两位日-两位时两位分.rar