自动备份压缩数据库--Global.asax

最近要求做一个自动备份压缩数据库的需求，很遗憾用的还是vs2003(以前最喜欢的版本，为啥？因为基本都要自己去敲，提示没2008，2010那么牛，部署还要手动，俺退化了......)

言归正传——————

这就要调用到Timers了，直接上代码：

/// <summary>
/// Global 的摘要说明。
/// </summary>
public class Global : System.Web.HttpApplication
{
public static int CheckUpDateLock = 0;
public static object LockObject = new Object();

protected void Application_Start(Object sender, EventArgs e)
{

System.Timers.Timer t = new System.Timers.Timer(20000);//实例化Timer类，设置间隔时间为10000毫秒；
t.Elapsed += new System.Timers.ElapsedEventHandler(theout);//到达时间的时候执行事件；
t.AutoReset = true;//设置是执行一次（false）还是一直执行(true)；
t.Enabled = true;//是否执行System.Timers.Timer.Elapsed事件；

}

public void theout(object source, System.Timers.ElapsedEventArgs e)
{

SqlConnection conn=DAOCommon.GetConnection();//数据库后台连接方法 ，这个地方可以修改为 new SqlConnection("XX")
string dbname=conn.Database;
string DB_FilePath=System.Configuration.ConfigurationSettings.AppSettings["DB_FilePath"];
string DB_FileTime=System.Configuration.ConfigurationSettings.AppSettings["DB_FileTime"];
if(DB_FilePath!=null && DB_FilePath!="" &&DB_FileTime!=null && DB_FileTime!="")
{
if (DateTime.Now.ToShortTimeString() == DB_FileTime)
{
lock (LockObject)//锁定
{
if (CheckUpDateLock == 0) CheckUpDateLock = 1;
else return;
}
string strConnectionString=conn.ConnectionString;
string strConn=strConnectionString.Replace(conn.Database,"master");
SqlConnection sqlcon =new SqlConnection(strConn);
try
{
if(sqlcon.State== ConnectionState.Closed)
{
sqlcon.Open();
}
SqlCommand  sqlComm = new SqlCommand("SP_DB_RAR", sqlcon);
sqlComm.CommandTimeout=200000;
//设置命令的类型为存储过程
sqlComm.CommandType = CommandType.StoredProcedure;
//设置参数
sqlComm.Parameters.Add("@FilePath_RAR", SqlDbType.VarChar);
sqlComm.Parameters.Add("@DB_NAME", SqlDbType.VarChar);
//为参数赋值
sqlComm.Parameters["@FilePath_RAR"].Value =DB_FilePath;
sqlComm.Parameters["@DB_NAME"].Value =conn.Database;
SqlDataAdapter myAdapter = new SqlDataAdapter(sqlComm);
//执行
sqlComm.ExecuteNonQuery();
// 解锁更新检查锁
lock (LockObject)
{
CheckUpDateLock = 0;
}

}
catch(Exception ex)
{
throw ex;
}
finally
{
sqlcon.Close();
}

}
}

}

其中调用了存储过程SP_DB_RAR，有两个参数FilePath_RAR（存储压缩数据库的路径），DB_NAME（要进行压缩的数据库名称）

脚本：

USE Master
GO

IF OBJECT_ID('SP_DB_RAR') IS NOT NULL
DROP PROC SP_DB_RAR;
GO
create proc SP_DB_RAR
(
@FilePath_RAR varchar(100),
@DB_NAME varchar(50)
)
as
begin
/** 开启xp_cmdshell支持 **/
Exec sp_configure 'show advanced options', 1
Reconfigure with override
Exec sp_configure 'xp_cmdshell', 1
Reconfigure with override
Exec sp_configure 'show advanced options', 0
Reconfigure with override

/** 定义参数 **/
Declare

--备份文件存储路径
@FilePath Nvarchar(100),

--数据库备份格式 为 数据库名称_日期(日期格式:20110326).bak
--数据库名称
@DbName Nvarchar(100),

--数据库备份后缀
@FileName Nvarchar(100),

--被压缩文件名称
@BakFile Nvarchar(100),

--压缩文件名称
@RarFileName Nvarchar(100),

--rar文件存放路劲
@RarFilePath varchar(100),
@RarCmd Nvarchar(150),
@Str varchar(100),
@Dir varchar(100)

Set @FilePath = @FilePath_RAR
Set @DbName = @DB_NAME
Set @FileName = convert(varchar(10),getdate(),112)
Set @RarFilePath = 'C:\Progra~1\WinRAR\RAR.exe'
set @BakFile=@FilePath+@DbName+'_'+@FileName+'.bak'
set @RarFileName=@FilePath+''+@DbName+'_'+@FileName+'.rar'
/** 定义完成 **/

/** 开始完整备份数据库 **/
Set @Str=@FilePath+@DbName+'_'+@FileName+'.bak'
BACKUP DATABASE @DbName TO DISK=@str
WITH RETAINDAYS=15,NOFORMAT,NOINIT,
NAME=N'完整备份',SKIP,NOREWIND,
NOUNLOAD,STATS=10
/** 备份完成 **/

/** 开始压缩新备份文件 **/
Set @RarCmd =@RarFilePath+' a -df -ep1 -m5 '+@RarFileName+' '+@BakFile
Exec master..xp_cmdshell @RarCmd
/** 参数说明 **/
/** a:添加文件到压缩文件 -df:压缩后删除文件 -ep1:从名称中排除基本目录 -m5:压缩级别为最大 **/
/** 压缩完成 **/

/** 删除过期的压缩文件 **/
Set @Dir='Del '+@FilePath+@DbName+'_'+convert(varchar(10),getdate()-4,112)+'.rar'
Exec master..xp_cmdshell @Dir
/** 删除结束 **/

/** 关闭xp_cmdshell支持 **/
Exec sp_configure 'show advanced options', 1
Reconfigure with override
Exec sp_configure 'xp_cmdshell', 1
Reconfigure with override
Exec sp_configure 'show advanced options', 0
Reconfigure with override
/** 过程完成 **/

end

GO

--exec SP_DB_RAR 'H:\OCT_DB\','OCT_PM_v3'

这样就OK了！