数据库

本类阅读TOP10

·SQL语句导入导出大全
·SQL Server日期计算
·SQL语句导入导出大全
·SQL to Excel 的应用
·Oracle中password file的作用及说明
·MS SQLServer OLEDB分布式事务无法启动的一般解决方案
·sqlserver2000数据库置疑的解决方法
·一个比较实用的大数据量分页存储过程
·如何在正运行 SQL Server 7.0 的服务器之间传输登录和密码
·SQL中两台服务器间使用连接服务器

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
实用SQL: 通过向表加clusted索引重整数据库

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

--
--   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




相关文章

相关软件