根据当月数据库自动生成下个月数据库--1

原创 2005年03月16日 10:30:00

/*--原帖地址:
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 master
go

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(引用请保留此信息)--*/

/*--调用示例

-- 复制 Pos
exec sp_ProcCopyDb 'Pos'
--*/
create proc sp_ProcCopyDb
@DB_Head sysname=N''  --数据库前缀
as
declare @sdbname sysname,@ddbname sysname
declare @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 null
begin
raiserror(N'源数据库"%s"不存在',1,16,@sdbname)
return
end

if db_id(@ddbname) is not null
begin
raiserror(N'目标数据库"%s"已经存在',1,16,@ddbname)
return
end

--临时备份文件名
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 @move=@move
+N'',move ''+quotename(rtrim(name),N'''''''')
+N'' to ''+quotename(rtrim(case
when charindex(N'
+quotename(@sdbname,N'''')
+N',filename)>0
then 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 disk=@bkfile with format'
exec sp_executesql @s,N'@bkfile Nvarchar(1000)',@bkfile

--还原为目标数据库
set @s=N'restore database '
+quotename(@ddbname)
+N' from disk=@bkfile with replace'
+@move
exec sp_executesql @s,N'@bkfile Nvarchar(1000)',@bkfile

--删除临时备份文件
set @s='del "'+@bkfile+'"'
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 @s
go

下一篇: 根据当月数据库自动生成下个月数据库--2

根据当月数据库自动生成下个月数据库--1

/*--原帖地址:http://community.csdn.net/Expert/topic/3818/3818559.xml?temp=.9593317--*//*--处理要求在sql数据库里有一...
  • chenzhiya
  • chenzhiya
  • 2008年01月03日 15:00
  • 139

根据当月数据库自动生成下个月数据库--1

/*--原帖地址:http://community.csdn.net/Expert/topic/3818/3818559.xml?temp=.9593317--*//*--处理要求在sql数据库里有一...
  • changjiangzhibin
  • changjiangzhibin
  • 2008年04月21日 01:00
  • 413

根据当月数据库自动生成下个月数据库--1

/*--原帖地址:http://community.csdn.net/Expert/topic/3818/3818559.xml?temp=.9593317--*//*--处理要求在sql数据库里有一...
  • emailqjc
  • emailqjc
  • 2010年02月08日 13:03
  • 367

根据当月数据库自动生成下个月数据库

/*--原帖地址:http://community.csdn.net/Expert/topic/3818/3818559.xml?temp=.9593317--*//*--处理要求在sql数据库里有一...
  • Teng_s2000
  • Teng_s2000
  • 2005年10月25日 15:00
  • 845

根据当月数据库自动生成下个月数据库--2

--方法2. 脚本复制use mastergoif exists (select * from dbo.sysobjects where id = object_id(N[dbo].[sp_ProcC...
  • chenzhiya
  • chenzhiya
  • 2008年01月03日 15:00
  • 173

根据当月数据库自动生成下个月数据库--3

 --创建一个每月最后一个工作日执行的作业,调用上述存储过程实现自动创建数据库use mastergo--设置 SQL Agent 服务为自动启动exec msdb..sp_set_sqlagent_...
  • zjcxc
  • zjcxc
  • 2005年03月16日 10:34
  • 3234

根据当月数据库自动生成下个月数据库--3

 --创建一个每月最后一个工作日执行的作业,调用上述存储过程实现自动创建数据库use mastergo--设置 SQL Agent 服务为自动启动exec msdb..sp_set_sqlagent_...
  • chenzhiya
  • chenzhiya
  • 2008年01月03日 14:58
  • 138

根据当月自动生成下个月数据库--1

  • zgqtxwd
  • zgqtxwd
  • 2008年04月26日 13:55
  • 124

根据当月数据库自动生成下个月数据库--3

--创建一个每月最后一个工作日执行的作业,调用上述存储过程实现自动创建数据库use mastergo--设置 SQL Agent 服务为自动启动exec msdb..sp_set_sqlagent_p...
  • changjiangzhibin
  • changjiangzhibin
  • 2008年04月21日 01:06
  • 272

根据当月数据库自动生成下个月数据库--2

根据当月数据库自动生成下个月数据库--2  --方法2. 脚本复制use mastergoif exists (select * from dbo.sysobjects where id = obje...
  • wuhuif
  • wuhuif
  • 2007年01月08日 13:16
  • 428
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:根据当月数据库自动生成下个月数据库--1
举报原因:
原因补充:

(最多只允许输入30个字)