Get useful information about database tables

TablesInfo.sql

declare @t table (name varchar (255),
                  [rows] varchar(255),
                  reserved varchar(255),
                  data varchar (255),
                  index_size varchar( 255),
                  unused varchar(255 ))
delete from @t
insert into @t exec sp_MSforeachtable @command1 ='EXEC sp_spaceused ''?''',@whereand= 'or OBJECTPROPERTY(o.id, N''IsSystemTable'') = 1'
select *
from @t
order by CONVERT( bigint,REPLACE (data, ' KB','')) DESC