数据库批量备份存储过程(判断盘符、路径，错误盘符返回，不存在的路径自动创建)

-- ------------------------------------------------------------------------
-- Author : htl258(Tony)
-- Date   : 2010-04-18 10:45:14
-- Version:Microsoft SQL Server 2008 (RTM) - 10.0.1600.22 (Intel X86)
--           Jul 9 2008 14:43:34
--           Copyright (c) 1988-2008 Microsoft Corporation
--           Developer Edition on Windows NT 5.1 <X86> (Build 2600: Service Pack 2)
-- Blog   :http://blog.csdn.net/htl258
-- Subject:数据库批量备份存储过程(判断盘符、路径，错误盘符返回，不存在的路径自动创建)
-- ------------------------------------------------------------------------
--适用环境：SQL Server 2005及以上版本(主要用于作业中调用以及程序开发中调用)

 

USE master
GO
-- 1.周期性备份数据库代码(保留原来备份的):
-- 备份文件名为：原数据库名称+'_'+备份日期.bak
IF OBJECT_ID ( ' sp_backupdatabase ' ) IS NOT NULL
    DROP PROC sp_backupdatabase
GO
CREATE PROC sp_backupdatabase
@path NVARCHAR ( 100 ) -- 路径
AS
-- 路径名格式标准化
IF RIGHT ( @path , 1 ) <> ' \ ' SET @path = @path + ' \ '
-- 获取文件夹信息
DECLARE @t TABLE (id INT IDENTITY ,a INT ,b INT ,c INT )
DECLARE @fpath NVARCHAR ( 3 )
SET @fpath =LEFT ( @path , 3 )
INSERT @t EXEC master..xp_fileexist @fpath
INSERT @t EXEC master..xp_fileexist @path
-- 如果指定盘符有误不存在，则返回错误提示：
IF EXISTS ( SELECT 1 FROM @t WHERE id = 1 AND c = 0 )
BEGIN
    RAISERROR (N ' 输入的盘符不存在，请重新输入! ' , 16 , 1 )
    RETURN
END
-- 如果不存在指定的文件夹，则创建:
ELSE IF EXISTS ( SELECT 1 FROM @t WHERE b = 0 AND id = 2 )
BEGIN
    DECLARE @mddir NVARCHAR ( 100 )
    SET @mddir = ' md ' + @path
    EXEC master..xp_cmdshell @mddir
END
-- 开始备份数据库到指定的目录
DECLARE @s nvarchar ( 4000 )
SELECT @s = ISNULL ( @s + ' ; ' , '' )
        + N ' BACKUP database [ ' + name + ' ] TO DISK = '''
        + @path + name + ' _ ' + CONVERT ( NVARCHAR ( 8 ), getdate (), 112 ) + N ' .bak '''
FROM master..sysdatabases
WHERE name NOT IN ( ' master ' , ' tempdb ' , ' model ' , ' msdb ' , ' pubs ' ) -- 这里筛选不参加备份的数据库
EXEC ( @S )
GO
-- 调用方法：
EXEC sp_backupdatabase ' f:\Backup\tony '
/*
--返回信息：
已为数据库 'mydb'，文件 'mydb' (位于文件 1 上)处理了 312 页。
已为数据库 'mydb'，文件 'mydb_log' (位于文件 1 上)处理了 1 页。
BACKUP DATABASE 成功处理了 313 页，花费 0.733 秒(3.336 MB/秒)。
已为数据库 'test'，文件 'test' (位于文件 1 上)处理了 208 页。
已为数据库 'test'，文件 'test_log' (位于文件 1 上)处理了 1 页。
BACKUP DATABASE 成功处理了 209 页，花费 0.413 秒(3.951 MB/秒)。
--备份后的文件列表：
mydb_20100418.bak
test_20100418.bak
*/


-- 2.周期性备份数据库代码(自动删除原备份文件):
-- 备份文件名为：原数据库名称.bak
IF OBJECT_ID ( ' sp_backupdatabase ' ) IS NOT NULL
    DROP PROC sp_backupdatabase
GO
CREATE PROC sp_backupdatabase
@path NVARCHAR ( 100 ) -- 路径
AS
-- 路径名格式标准化
IF RIGHT ( @path , 1 ) <> ' \ ' SET @path = @path + ' \ '
-- 获取文件夹信息
DECLARE @t TABLE (id INT IDENTITY ,a INT ,b INT ,c INT )
DECLARE @fpath NVARCHAR ( 3 )
SET @fpath =LEFT ( @path , 3 )
INSERT @t EXEC master..xp_fileexist @fpath
INSERT @t EXEC master..xp_fileexist @path
-- 如果指定盘符有误不存在，则返回错误提示：
IF EXISTS ( SELECT 1 FROM @t WHERE id = 1 AND c = 0 )
BEGIN
    RAISERROR (N ' 输入的盘符不存在，请重新输入! ' , 16 , 1 )
    RETURN
END
-- 如果不存在指定的文件夹，则创建:
ELSE IF EXISTS ( SELECT 1 FROM @t WHERE b = 0 AND id = 2 )
BEGIN
    DECLARE @mddir NVARCHAR ( 100 )
    SET @mddir = ' md ' + @path
    EXEC master..xp_cmdshell @mddir
END
-- 开始备份数据库到指定的目录
DECLARE @s nvarchar ( 4000 )
SELECT @s = ISNULL ( @s + ' ; ' , '' )
        + N ' BACKUP database [ ' + name + ' ] TO DISK = '''
        + @path + name + N ' .bak '' WITH INIT '
FROM master..sysdatabases
WHERE name NOT IN ( ' master ' , ' tempdb ' , ' model ' , ' msdb ' , ' pubs ' ) -- 这里筛选不参加备份的数据库
EXEC ( @S )
GO
-- 调用方法：
EXEC sp_backupdatabase ' f:\Backup\tony2 '
/*
--返回信息：
已为数据库 'mydb'，文件 'mydb' (位于文件 1 上)处理了 312 页。
已为数据库 'mydb'，文件 'mydb_log' (位于文件 1 上)处理了 1 页。
BACKUP DATABASE 成功处理了 313 页，花费 0.599 秒(4.082 MB/秒)。
已为数据库 'test'，文件 'test' (位于文件 1 上)处理了 208 页。
已为数据库 'test'，文件 'test_log' (位于文件 1 上)处理了 1 页。
BACKUP DATABASE 成功处理了 209 页，花费 0.351 秒(4.651 MB/秒)。
--备份后的文件列表：
mydb.bak
test.bak
*/