/*--原帖地址:http://community.csdn.net/expert/topic/3818/3818559.xml?temp=.9593317--*/
/*--处理要求
在sql数据库里有一个名为pos200502的database，每个月会有一个类似于这样名称(pos200502 pos200503)的database
我该如何利用sql server的自动作业+一段存储过程，实现以下功能：1.每个月的25号，自动创建一个下一个月的database,database名字定为：posyyyymm (yyyymm是年和月，始终是执行操作时间的下一个月)2.再将本月database的所有结构（包括表、视图、存储过程等）一模一样的复制到下一个月的database中。（注意仅复制结构，不复制任何数据！）--*/
---方法1. 备份+恢复use mastergo
if exists (select * from dbo.sysobjects where id = object_id(n'[dbo].[sp_proccopydb]') and objectproperty(id, n'isprocedure') = 1)drop procedure [dbo].[sp_proccopydb]go
/*--数据库自动复制
将指定前缘的数据库,复制为一个以当前月份+1为库名的数据库中,并且清除所有的数据例如,数据库前缘为 pos ,当前日期为 2005-3-27则要求复制数据 pos200503 为 pos200504,并且清空里面的数据
用备份+恢复的方法实现好处是在清理数据时,可以设置条件,保留指定的数据不好的地方是数据多时,速度慢,消耗的资源多
--邹建 2005.03(引用请保留此信息)--*/
/*--调用示例
-- 复制 posexec sp_proccopydb 'pos'--*/create proc [email protected]_head sysname=n'' --数据库前缀asdeclare @sdbname sysname,@ddbname sysnamedeclare @s nvarchar(4000),@bkfile nvarchar(1000),@move nvarchar(4000)
--复制的源库名及目标库名if @db_head is null set @db_head=n''
select @[email protected]_head+convert(char(6),getdate(),112),@[email protected]_head+convert(char(6),dateadd(month,1,getdate()),112)
if db_id(@sdbname) is nullbeginraiserror(n'源数据库"%s"不存在',1,16,@sdbname)returnend
if db_id(@ddbname) is not nullbeginraiserror(n'目标数据库"%s"已经存在',1,16,@ddbname)returnend
--临时备份文件名select top 1 @bkfile=rtrim(reverse(filename)) from master.dbo.sysfiles where name=n'master'select @bkfile=stuff(@bkfile,1,charindex('/',@bkfile),n''),@bkfile=reverse(stuff(@bkfile,1,charindex('/',@bkfile),n''))+n'/backup/'+cast(newid() as nvarchar(36))+n'.bak'
--数据文件移动语句set @s=n'set @move=n''''select @[email protected]+n'',move ''+quotename(rtrim(name),n'''''''')+n'' to ''+quotename(rtrim(case when charindex(n'+quotename(@sdbname,n'''')+n',filename)>0then stuff(filename,charindex(n'+quotename(@sdbname,n'''')+n',filename),'+cast(len(@sdbname) as nvarchar)+n',n'+quotename(@ddbname,n'''')+n')else reverse(stuff(reverse(filename),charindex(''/'',reverse(filename)),0,+n''_''+reverse(n'+quotename(@ddbname,n'''')+n')))end),n'''''''')from '+quotename(@sdbname)+n'.dbo.sysfiles'exec sp_executesql @s,n'@move nvarchar(4000) out',@move out
--备份源数据库set @s=n'backup database '+quotename(@sdbname)+n' to [email protected] with format'exec sp_executesql @s,n'@bkfile nvarchar(1000)',@bkfile
--还原为目标数据库set @s=n'restore database '+quotename(@ddbname)+n' from [email protected] with replace'[email protected] sp_executesql @s,n'@bkfile nvarchar(1000)',@bkfile
--删除临时备份文件set @s='del "'[email protected]+'"'exec master..xp_cmdshell @s,no_output
--清理目标数据库中的所有数据set @s=n'use '+quotename(@ddbname)+n'exec sp_msforeachtable @command1=n''truncate table ?'',@whereand=n'' and objectproperty(o.id,n''''tablehasforeignref'''')=0''exec sp_msforeachtable @command1=n''delete from ?'',@whereand=n'' and objectproperty(o.id,n''''tablehasforeignref'''')=1'''exec sp_executesql @sgo
