实用SQL:通过向表加clusted索引重整数据库

发表于:2007-05-25来源:作者:点击数: 标签:
-- --ArrangeDB. SQL 重整 数据库 -- -- CopyRights @2003.12.29 Digital China Management System Co., Ltd. -- --重整流程:把所有用户表增加 clustered 索引,这样SQL SERVER会重整表,然后 -- 再删除索引 -- --使用时机:日常维护,建议每周做一次重整。

--
--   ArrangeDB.SQL 重整数据库
--
--   CopyRights @2003.12.29 Digital China Management System Co., Ltd.
--
-- 重整流程:把所有用户表增加 clustered 索引,这样SQL SERVER会重整表,然后
-- 再删除索引
--
-- 使用时机:日常维护,建议每周做一次重整。
--
-- 注意事项:做完后请做数据库收缩,更新统计,重新索引,及完整性检查 

--drop table #dcms_index_info
--要用到的临时表
create table #dcms_index_info
(
  index_name sysname,
  index_description varchar(210),
  index_keys varchar(2078)
)

--设置环境
set NOCOUNT ON
--程序开始:变量
declare @sql varchar(500)
declare @TableName varchar(20)
declare @ErrorSave int

--用所有的用户表处理
declare Cursor1 Cursor
for
 select name from sysobjects where xtype='U' order by name

open Cursor1
fetch next from Cursor1 into @TableName

while @@fetch_status = 0
begin
 --为了检测表中是不是有CREATE_DATE这个列,易飞的表中都有,如果没有就跳过,不过处理
 --应该还有更好的方法,我暂时这样用了。不想用sp_columns因为不想建表,慢就慢点吧
 if COLUMNPROPERTY(OBJECT_ID(@TableName),'CREATE_DATE','PRECISION') is not null
 begin
  print 'process table ' + @TableName

  --取得当前表的索引信息
  delete #dcms_index_info
  set @sql = ' sp_helpindex '' + @TableName + '' '
  insert into #dcms_index_info exec (@sql)

  --查找是不是已经有聚簇索引(clustered),如果已经有了就不做,在易飞中有clustered索引是少数
  select index_name from #dcms_index_info where index_description like 'clustered%'

  if @@ROWCOUNT = 0
  begin
   set @sql = ' create clustered index DcTempIndex001 on ' + @TableName + ' ( CREATE_DATE ) '
   exec (@sql)

   set @sql = ' DROP index ' + @TableName + '.DcTempIndex001 '
   exec (@sql)
  end
 end

 fetch next from Cursor1 into @TableName
end
 
drop table #dcms_index_info
close Cursor1
deallocate Cursor1


原文转自:http://www.ltesting.net