【推荐】(SqlServer)不公开存储过程sp_Msforeachtable与sp_Msforeachdb详解

EXEC sp_MSforeachtable " EXECUTE sp_spaceused  ' ? '"

   @command1  nvarchar( 2000),           -- 第一条运行的SQL指令
   @replacechar  nchar( 1)  = N ' ? ',       -- 指定的占位符号
   @command2  nvarchar( 2000) =  null,     -- 第二条运行的SQL指令
   @command3  nvarchar( 2000)   =  null,   -- 第三条运行的SQL指令
   @whereand  nvarchar( 2000)   =  null,   -- 可选条件来选择表
   @precommand  nvarchar( 2000) =  null,   -- 执行指令前的操作(类似控件的触发前的操作)
   @postcommand  nvarchar( 2000) =  null   -- 执行指令后的操作(类似控件的触发后的操作)

use master
exec sp_helptext sp_MSforeachtable
exec sp_helptext sp_Msforeachdb

   exec sp_MSforeachtable  @command1 ="sp_spaceused  ' ? '"
 
   -- 获得每个表的记录数和容量:
   EXEC sp_MSforeachtable  @command1 =" print  ' ? '",
                          @command2 ="sp_spaceused  ' ? '",
                          @command3 = " SELECT  count( *)  FROM ? "
 
   -- 获得所有的数据库的存储空间:
   EXEC sp_MSforeachdb  @command1 =" print  ' ? '",
                       @command2 ="sp_spaceused "
 
   -- 检查所有的数据库
   EXEC sp_MSforeachdb  @command1 =" print  ' ? '",
                       @command2 =" DBCC CHECKDB (?) "
 
   -- 更新PUBS数据库中已t开头的所有表的统计:
   EXEC sp_MSforeachtable    @whereand =" and name  like  ' t% '",
                            @replacechar = ' * ',
                            @precommand =" print  ' Updating Statistics..... '  print  ''",
                            @command1 =" print  ' * '  update  statistics  * ",
                            @postcommand = " print '' print  ' Complete Update Statistics! '"
 
   -- 删除当前数据库所有表中的数据
  sp_MSforeachtable  @command1 = ' Delete from ? '
  sp_MSforeachtable  @command1  = " TRUNCATE  TABLE ?"
 
-- 查询数据库所有表的记录总数
CREATE  TABLE # temp (TableName  VARCHAR ( 255), RowCnt  INT)
EXEC sp_MSforeachtable  ' INSERT INTO #temp SELECT  '' ? '' , COUNT(*) FROM ? '
SELECT TableName, RowCnt  FROM # temp  ORDER  BY TableName
DROP  TABLE # temp
 
-- 检查数据库里每个表或索引视图的数据、索引及text、ntext 和image 页的完整性
-- 下列语句需在单用户模式下执行（sp_dboption 'db_name', 'single user', 'true'）
-- ,将true改成false就又变成多用户了
exec sp_msforeachtable " dbcc checktable( ' ? ',repair_rebuild)"

@whereand = '  AND o.name in ( '' Table1 '' , '' Table2 '' ,.......) ' 

 sp_MSforeachtable  @command1 = ' Update ? Set NOTE= ''''  Where NOTE is NULL '
                  , @whereand = '  AND o.name in ( '' Table1 '' , '' Table2 '' , '' Table3 '' ) '

GO
CREATE  proc sp_MSforeachObject
  @objectType  int = 1,
  @command1  nvarchar( 2000),
  @replacechar  nchar( 1)  = N ' ? ',
  @command2  nvarchar( 2000)  =  null,
     @command3  nvarchar( 2000)  =  null,
  @whereand  nvarchar( 2000)  =  null,
  @precommand  nvarchar( 2000)  =  null,
  @postcommand  nvarchar( 2000)  =  null
as
  /*  This proc returns one or more rows for each table (optionally, matching @where), with each table defaulting to its
own result set  */
  /*  @precommand and @postcommand may be used to force a single result set via a temp table.  */
  /*  Preprocessor won't replace within quotes so have to use str().  */
  declare  @mscat  nvarchar( 12)
  select  @mscat  =  ltrim( str( convert( int,  0x0002)))
  if ( @precommand  is  not  null)
   exec( @precommand)
  /*  Defined  @isobject for save object type  */
  Declare  @isobject  varchar( 256)
  select  @isobject =  case  @objectType  when  1  then  ' IsUserTable '
          when  2  then  ' IsView '
          when  3  then  ' IsTrigger '
          when  4  then  ' IsProcedure '
          when  5  then  ' IsDefault '  
          when  6  then  ' IsForeignKey '
          when  7  then  ' IsScalarFunction '
          when  8  then  ' IsInlineFunction '
          when  9  then  ' IsPrimaryKey '
          when  10  then  ' IsExtendedProc '   
          when  11  then  ' IsReplProc '
          when  12  then  ' IsRule '
                   end
  /*  Create the select  */
  /*  Use @isobject variable isstead of IsUserTable string  */
EXEC(N ' declare hCForEach cursor global for select  '' [ ''  + REPLACE(user_name(uid), N '' ] '' , N '' ]] '' ) +  '' ] ''  +  '' . ''  +  '' [ ''  +
REPLACE(object_name(id), N '' ] '' , N '' ]] '' ) +  '' ] ''  from dbo.sysobjects o  '
         + N '  where OBJECTPROPERTY(o.id, N ''' + @isobject + ''' ) = 1  ' +N '  and o.category &  '  +  @mscat  + N '  = 0  '
        +  @whereand)
  declare  @retval  int
  select  @retval  =  @@error
  if ( @retval  =  0)
   exec  @retval  = sp_MSforeach_worker  @command1,  @replacechar,  @command2,  @command3
  if ( @retval  =  0  and  @postcommand  is  not  null)
   exec( @postcommand)
  return  @retval
GO

  -- 获得所有的存储过程的脚本:
EXEc sp_MSforeachObject  @command1 ="sp_helptext  ' ? ' ", @objectType = 4
 
-- 获得所有的视图的脚本:
EXEc sp_MSforeachObject  @command1 ="sp_helptext  ' ? ' ", @objectType = 2
 
-- 比如在开发过程中,没一个用户都是自己的OBJECT OWNER,所以在真实的数据库时都要改为DBO:
EXEc sp_MSforeachObject  @command1 ="sp_changeobjectowner  ' ? ',  ' dbo '", @objectType = 1
EXEc sp_MSforeachObject  @command1 ="sp_changeobjectowner  ' ? ',  ' dbo '", @objectType = 2
EXEc sp_MSforeachObject  @command1 ="sp_changeobjectowner  ' ? ',  ' dbo '", @objectType = 3
EXEc sp_MSforeachObject  @command1 ="sp_changeobjectowner  ' ? ',  ' dbo '", @objectType = 4