create proc p_myhelpindex @tbname sysname ='' , @CLUSTERED int = '1' as
--生成索引信息及索引创建脚本
--@tbname 表名，空返回空 --@CLUSTERED 是否显示聚集索引,1显示聚集索引,2不显示聚集索引
--调用：p_myhelpindex 'dbo.customers','1'
if @tbname is null or @tbname = '' return -1
declare @t table( table_name nvarchar(100), schema_name nvarchar(100), fill_factor int, is_padded int, ix_name nvarchar(100), type int, keyno int, column_name nvarchar(200), cluster varchar(20), ignore_dupkey varchar(20), [unique] varchar(20), groupfile varchar(10) )
declare @table_name nvarchar(100), @schema_name nvarchar(100), @fill_factor int, @is_padded int, @ix_name nvarchar(100),@ix_name_old nvarchar(100), @type int, @keyno int, @column_name nvarchar(100),
--@column_name_temp nvarchar(500),
@cluster varchar(20), @ignore_dupkey varchar(20), @unique varchar(20), @groupfile varchar(10)
declare ms_crs_ind cursor local static for select distinct table_name = a.name, schema_name = b.name, fill_factor= c.origfillfactor, is_padded = case
when c.status = 256 then 1 else 0 end, ix_name = c.name, type = c.indid , d.keyno, column_name = e.name +
case when indexkey_property(a.id,c.indid, d.keyno, 'isdescending') =1 then ' desc ' else '' end,
case when (c.status & 16)<>0 then 'clustered' else 'nonclustered' end,
case when (c.status & 1) <>0 then 'IGNORE_DUP_KEY' else '' end,
case when (c.status & 2) <>0 then 'unique' else '' end ,
g.groupname from sysobjects a
inner join sysusers b on a.uid = b.uid inner join sysindexes c on a.id = c.id
inner join sysindexkeys d on a.id = d.id and c.indid = d.indid inner join syscolumns e on a.id = e.id and d.colid = e.colid inner join sysfilegroups g on g.groupid = c.groupid
left join master.dbo.spt_values f on f.number = c.status and f.type = 'I' where a.id = object_id(@tbname) and c.indid < 255 and (c.status & 64)=0 and c.indid >= @CLUSTERED order by c.indid,d.keyno
open ms_crs_ind
fetch ms_crs_ind into @table_name , @schema_name , @fill_factor, @is_padded, @ix_name, @type , @keyno, @column_name, @cluster , @ignore_dupkey , @unique , @groupfile
if @@fetch_status < 0 begin deallocate ms_crs_ind raiserror(15472,-1,-1)
--'Object does not have any indexes.'
return -1
end
while @@fetch_status >= 0
begin
if exists(select 1 from @t where ix_name = @ix_name)
update @t set column_name = column_name+','+@column_name WHERE IX_NAME = @IX_NAME
else insert into @t select @table_name , @schema_name , @fill_factor, @is_padded, @ix_name, @type , @keyno, @column_name, @cluster , @ignore_dupkey , @unique , @groupfile
fetch ms_crs_ind into @table_name , @schema_name , @fill_factor, @is_padded, @ix_name, @type , @keyno, @column_name, @cluster , @ignore_dupkey , @unique , @groupfile
end
deallocate ms_crs_ind
select 'CREATE '+upper([unique])+ case when [unique] = '' then '' else ' ' end+upper(cluster)+' INDEX '+ix_name+' ON '+table_name+'('+column_name+')' + case when fill_factor > 0 or is_padded = 1 or (upper(cluster) != 'NONCLUSTERED' and ignore_dupkey = 'IGNORE_DUP_KEY' ) then ' WITH ' +case when is_padded = 1 then 'PAD_INDEX,' else '' end +case when fill_factor > 0 then 'FILLFACTOR ='+ltrim(fill_factor) else '' end +case when ignore_dupkey = 'IGNORE_DUP_KEY' and upper(cluster) = 'NONCLUSTERED' then case when (fill_factor > 0 or is_padded = 1) then ',IGNORE_DUP_KEY' else ',IGNORE_DUP_KEY' end else '' end else '' end +' ON ['+ groupfile+']' as col from @t
return 0
go
--转自http://blog.csdn.net/happyflystone/article/details/4131689
--输出全库所有表的索引脚本
declare @tbname varchar(50)
create table #t(txt varchar(500))
declare @sql varchar(100)
declare tbna cursor local for
select name from sysobjects where xtype='U' --and name like '%090324'
open tbna
fetch next from tbna into @tbname
while @@fetch_status=0
begin
set @sql='insert #t(txt) exec p_myhelpindex '''+@tbname+''''
exec(@sql)
fetch next from tbna into @tbname
end
close tbna
deallocate tbna
select * from #t
drop table #t
