Fragmentation in all indexes in all tables in a database

This script will create a table called Fragstats and load it with fragmentation information for all tables in the database.

SET NOCOUNT ON

DECLARE @tablename VARCHAR (128)

DECLARE @execstr VARCHAR (255)

DECLARE @objectid INT

DECLARE @indexid INT

DECLARE @frag DECIMAL

DECLARE @maxfrag DECIMAL

DECLARE @dbname VARCHAR (40)

if not exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[FragStats]') and OBJECTPROPERTY(id, N'IsUserTable') = 1)

CREATE TABLE [dbo].[FragStats] (

[ObjectName] [char] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

[ObjectId] [int] NULL ,

[IndexName] [char] (255) COLLATE SQL_Latin1_General_CP1_CI_AS NULL ,

[IndexId] [int] NULL ,

[Lvl] [int] NULL ,

[CountPages] [int] NULL ,

[CountRows] [int] NULL ,

[MinRecSize] [int] NULL ,

[MaxRecSize] [int] NULL ,

[AvgRecSize] [int] NULL ,

[ForRecCount] [int] NULL ,

[Extents] [int] NULL ,

[ExtentSwitches] [int] NULL ,

[AvgFreeBytes] [int] NULL ,

[AvgPageDensity] [int] NULL ,

[ScanDensity] [decimal](18, 0) NULL ,

[BestCount] [int] NULL ,

[ActualCount] [int] NULL ,

[LogicalFrag] [decimal](18, 0) NULL ,

[ExtentFrag] [decimal](18, 0) NULL ,

[TStamp] [datetime] NULL ,

[DBName] [varchar] (40) COLLATE SQL_Latin1_General_CP1_CI_AS NULL

)

-- Declare cursor

DECLARE tables CURSOR FOR

SELECT TABLE_NAME

FROM INFORMATION_SCHEMA.TABLES

WHERE TABLE_TYPE = 'BASE TABLE'

-- Create the table

CREATE TABLE #fraglist (

ObjectName CHAR (255),

ObjectId INT,

IndexName CHAR (255),

IndexId INT,

Lvl INT,

CountPages INT,

CountRows INT,

MinRecSize INT,

MaxRecSize INT,

AvgRecSize INT,

ForRecCount INT,

Extents INT,

ExtentSwitches INT,

AvgFreeBytes INT,

AvgPageDensity INT,

ScanDensity DECIMAL,

BestCount INT,

ActualCount INT,

LogicalFrag DECIMAL,

ExtentFrag DECIMAL)

-- Open the cursor

OPEN tables

-- Loop through all the tables in the database

FETCH NEXT

FROM tables

INTO @tablename

WHILE @@FETCH_STATUS = 0

BEGIN

-- Do the showcontig of all indexes of the table

INSERT INTO #fraglist

EXEC ('DBCC SHOWCONTIG (''' + @tablename + ''')

WITH FAST, TABLERESULTS, ALL_INDEXES, NO_INFOMSGS')

FETCH NEXT

FROM tables

INTO @tablename

END

-- Close and deallocate the cursor

CLOSE tables

DEALLOCATE tables

insert into [FragStats] select *,getdate(),@dbname from #Fraglist

drop table #fraglist

go