清除指定数据库各个表中所有的记录

 ---- 清除指定数据库各个表中所有的记录

  use   database   ---打开指定的数据库名
  declare   @name   varchar(140)  
  declare deletecursor cursor  for   select   name   from   datebawse.dbo.sysobjects   where   xtype='U' ---U是得到所有的用户建立的表 
  open   deletecursor  
  fetch   next   from   ##cursor   into   @name  

  while   @@fetch_status=0   --执行到最后
  begin

    ---exec('select '+@name)   

      exec('truncate   table '+@name)

      fetch   next   from   deletecursor   into   @name  

  end  
  close   deletecursor  
  deallocate   deletecursor