IDC资讯中心
/*–原帖地址: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, nisprocedure) = 1)drop procedure [dbo].[sp_proccopydb]go
/*–数据库自动复制
将指定前缘的数据库,复制为一个以当前月份+1为库名的数据库中,并且清除所有的数据例如,数据库前缘为 pos ,当前日期为 2005-3-27则要求复制数据 pos200503 为 pos200504,并且清空里面的数据
用备份+恢复的方法实现好处是在清理数据时,可以设置条件,保留指定的数据不好的地方是数据多时,速度慢,消耗的资源多
–邹建 2005.03(引用请保留此信息)–*/
/*–调用示例
— 复制 posexec sp_proccopydb pos–*/create proc sp_proccopydb@db_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 @sdbname=@db_head+convert(char(6),getdate(),112),@ddbname=@db_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=nmasterselect @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=nset @move=nselect @move=@move+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.sysfilesexec sp_executesql @s,n@move nvarchar(4000) out,@move out
–备份源数据库set @s=nbackup database +quotename(@sdbname)+n to disk=@bkfile with formatexec sp_executesql @s,n@bkfile nvarchar(1000),@bkfile
–还原为目标数据库set @s=nrestore database +quotename(@ddbname)+n from disk=@bkfile with replace+@moveexec sp_executesql @s,n@bkfile nvarchar(1000),@bkfile
–删除临时备份文件set @s=del "+@bkfile+"exec master..xp_cmdshell @s,no_output
–清理目标数据库中的所有数据set @s=nuse +quotename(@ddbname)+nexec sp_msforeachtable @command1=ntruncate table ?,@whereand=n and objectproperty(o.id,ntablehasforeignref)=0exec sp_msforeachtable @command1=ndelete from ?,@whereand=n and objectproperty(o.id,ntablehasforeignref)=1exec sp_executesql @sgo
