求SQLServer2000的备份数据库的存储过程

[jtg98g3]

要求如下:
1.能完全备份数据库指定的文件名中.
最好能检测目录是否存在,如果不存在,那么创建他。

[华夏小卒]

备份的时候，用时间来作为文件名就好了，不用判断存不存在

实在要判断，用系统proc

xp_fileexist

[hao1hao2hao3]

[Quote=引用 1 楼 js_szy 的回复:]
备份的时候，用时间来作为文件名就好了，不用判断存不存在

实在要判断，用系统proc

xp_fileexist
[/Quote]


用时间做文件名挺好的，但是楼主说的是目录，文件的路径。

等大牛！

[华夏小卒]

declare @result int
exec xp_fileexist 'c:\autoexec.bat', @result output 

@result=1表文件存在
@result=0表文件不存

[华夏小卒]

if object_id('p_dbbak') is not null drop proc p_dbbak
go 

create  proc p_dbbak
@db  varchar(15),		 -- 要备份的 database
@bak_name varchar(110)   -- bak路径+文件名
as
		
	declare @result int,@delstr varchar(100)
	exec xp_fileexist @bak_name, @result output 

	if @result=1		 --表文件存在,先删除
		begin
			set @delstr='del "'+@bak_name+'"'
			exec xp_cmdshell @delstr
		end


	set @bak_name='backup database '+@db +' to disk='''+@bak_name+''''
	exec(@bak_name)

go 


exec p_dbbak 'szy','G:\SQL\szy.bak'

[obuntu]

你这是要程序调用？如果不是的话，其实微软自带的备份功能已经能够满足90%以上的备份需求的。

[我没有吃饭]

/*--恢复数据库的通用存储过程   
    
  --邹建   2003.10--*/   
    
  /*--调用示例   
  --完整恢复数据库   
  exec   p_RestoreDb   @bkfile='c:\db_20031015_db.bak',@dbname='db'   
    
  --差异备份恢复   
  exec   p_RestoreDb   @bkfile='c:\db_20031015_db.bak',@dbname='db',@retype='DBNOR'   
  exec   p_RestoreDb   @bkfile='c:\db_20031015_df.bak',@dbname='db',@retype='DF'   
    
  --日志备份恢复   
  exec   p_RestoreDb   @bkfile='c:\db_20031015_db.bak',@dbname='db',@retype='DBNOR'   
  exec   p_RestoreDb   @bkfile='c:\db_20031015_log.bak',@dbname='db',@retype='LOG'   
    
  --*/   
    
  create   proc   p_RestoreDb   
  @bkfile   nvarchar(1000), --定义要恢复的备份文件名   
  @dbname   sysname='',         --定义恢复后的数据库名,默认为备份的文件名   
  @dbpath   nvarchar(260)='', --恢复后的数据库存放目录,不指定则为SQL的默认数据目录   
  @retype   nvarchar(10)='DB', --恢复类型:'DB'完事恢复数据库,'DBNOR'   为差异恢复,日志恢复进行完整恢复,'DF'   差异备份的恢复,'LOG'   日志恢复   
  @filenumber   int=1, --恢复的文件号   
  @overexist   bit=1,             --是否覆盖已经存在的数据库,仅@retype为'DB'/'DBNOR'是有效   
  @killuser   bit=1,       --是否关闭用户使用进程,仅@overexist=1时有效   
  @password   nvarchar(20)='' --备份文件的密码(仅sql2000支持),如果备份时设置了密码,必须提供此密码   
  as   
  declare   @sql   varchar(8000)   
    
  --得到恢复后的数据库名   
  if   isnull(@dbname,'')=''   
  select   @sql=reverse(@bkfile)   
  ,@sql=case   when   charindex('.',@sql)=0   then   @sql   
  else   substring(@sql,charindex('.',@sql)+1,1000)   end   
  ,@sql=case   when   charindex('\',@sql)=0   then   @sql   
  else   left(@sql,charindex('\',@sql)-1)   end   
  ,@dbname=reverse(@sql)   
    
  --得到恢复后的数据库存放目录   
  if   isnull(@dbpath,'')=''   
  begin   
  select   @dbpath=rtrim(reverse(filename))   from   master..sysfiles   where   name='master'   
  select   @dbpath=reverse(substring(@dbpath,charindex('\',@dbpath),4000))   
  end   
    
  --生成数据库恢复语句   
  set   @sql='restore   '+case   @retype   when   'LOG'   then   'log   '   else   'database   '   end+@dbname   
  +'   from   disk='''+@bkfile+''''   
  +'   with   file='+cast(@filenumber   as   varchar)   
  +case   when   @overexist=1   and   @retype   in('DB','DBNOR')   then   ',replace'   else   ''   end   
  +case   @retype   when   'DBNOR'   then   ',NORECOVERY'   else   ',RECOVERY'   end   
  +case   isnull(@password,'')   when   ''   then   ''   else   ',PASSWORD='''+@password+''''   end   
    
  --添加移动逻辑文件的处理   
  if   @retype='DB'   or   @retype='DBNOR'   
  begin   
  --从备份文件中获取逻辑文件名   
  declare   @lfn   nvarchar(128),@tp   char(1),@i   int,@s   varchar(1000)   
    
  --创建临时表,保存获取的信息   
  create   table   #tb(ln   nvarchar(128),pn   nvarchar(260),tp   char(1),fgn   nvarchar(128),sz   numeric(20,0),Msz   numeric(20,0))   
  --从备份文件中获取信息   
  set   @s='restore   filelistonly   from   disk='''+@bkfile+''''   
  ++case   isnull(@password,'')   when   ''   then   ''   else   '   with   PASSWORD='''+@password+''''   end   
  insert   into   #tb   exec(@s)   
  declare   #f   cursor   for   select   ln,tp   from   #tb   
  open   #f   
  fetch   next   from   #f   into   @lfn,@tp   
  set   @i=0   
  while   @@fetch_status=0   
  begin   
  select   @sql=@sql+',move   '''+@lfn+'''   to   '''+@dbpath+@dbname+cast(@i   as   varchar)   
  +case   @tp   when   'D'   then   '.mdf'''   else   '.ldf'''   end   
  ,@i=@i+1   
  fetch   next   from   #f   into   @lfn,@tp   
  end   
  close   #f   
  deallocate   #f   
  end   
    
  --关闭用户进程处理   
  if   @overexist=1   and   @killuser=1   
  begin   
  declare   @spid   varchar(20)   
  declare   #spid   cursor   for   
  select   spid=cast(spid   as   varchar(20))   from   master..sysprocesses   where   dbid=db_id(@dbname)   
  open   #spid   
  fetch   next   from   #spid   into   @spid   
  while   @@fetch_status=0   
  begin       
  exec('kill   '+@spid)   
  fetch   next   from   #spid   into   @spid   
  end       
  close   #spid   
  deallocate   #spid   
  end   
    
  --恢复数据库   
  exec(@sql)   
    
  go

[我没有吃饭]

发错了。。。。

[zhengduan964532]

Declare @Backup_Path Varchar(3000)
Declare @Backuo_Time Varchar(200)
Set @Backuo_Time = 'cfms_log' + CONVERT (Varchar,GetDate(),112) + Replace(CONVERT (Varchar,getDate(),108),':','') + '.bak'
Set @Backup_Path = 'BackUp Database cfms_log to Disk = ''d:\' + @Backuo_Time + ''''
Print @Backup_Path
Execute(@Backup_Path)

[永生天地]

[Quote=引用 5 楼 obuntu 的回复:]
你这是要程序调用？如果不是的话，其实微软自带的备份功能已经能够满足90%以上的备份需求的。
[/Quote]
写程序做会容易多了

[jtg98g3]

你们提供的答案都不错.

[人鱼传说]

估计你是程序中要提供个备份功能吧！SQL帮助有示例代码或用SQL自带备份向导时会有SQL脚本