代码如下：
--Full BackUp
--Use Master
CREATE proc [dbo].[bakup_DataBase]
as
Declare @strPsw varchar(50)
Declare @strUsr varchar(50)
Declare @strCmdShell varchar(300)
Declare @strDataBaseName varchar(20)
Declare @FullFileName Varchar(200)
Declare @FileFlag varchar(50)
Declare @ToFileName varchar(200)
Declare @SQLStr varchar(500)
Declare @SQLStr2 varchar(500)
Declare @FlagDel varchar(20)
Set
@FileFlag=replace(replace(convert(char(20),getdate(),20),':','') ,' ','-') --备份的文件命名规则:日期-时间.bak
Set @strUsr='SOFMTI_TD/-/administrator' --需填写域名/-/用户名（目标机器的Windows 登陆名)
Set @strPsw='sofmit'--需填写Windows 登陆密码(如:Soondy)
Set @strCmdShell= 'net use /-//-/192.168.0.22/-/c$ ' + @strPsw + ' /user:' +@strUsr --需填写IP(目标机器的IP 地址，如:192.168.2.178)
Set @strDataBaseName='LilianDB'--填写数据库名称(如:Soondy)
Set @FullFileName='E:/-/SqlServer自动备份文件/-/'+'LilianDB_backup_'+@FileFlag+'.BAK'--需填写本地备份临时文件的目录，因为需要先备份到本地再 copy 到目标机器(如:保存目录为 E:/-/SoondyTest/-/)
Set @ToFileName='/-//-/192.168.0.22/-/D$/-/OneCardBak/-/' --需填写IP(目标机器的IP 地址)以及保存的目录(如:/-//-/192.168.2.178/-/c$/-/Test/-/)
Set @FlagDel='False'--填写True 表示删除本地的备份临时文件，填写False 或其他字符表示保留该文件
Set @SQLStr='copy '+@FullFileName+' '+@ToFileName
Set @SQLStr2='del ' +@FullFileName
BackUp DataBase @strDataBaseName To Disk= @FullFileName with init
exec master..xp_cmdshell @strCmdShell--尝试连接到目标机器
exec Master..xp_cmdshell @SQLStr --拷贝到目标机器上
if (@FlagDel ='True') exec master.. xp_cmdshell @SQLStr2--删除本地的备份临时文件