Retreiving all the Table Information from SQL

/* 
Script for retrieving the list of Tables from the Database 
Author :Suresh Ramakrishnan

*/*********************************************************

Select
'Table Name ' = B.name,
'Column name' = A.name,
'Column No'   = colid,
'Type'        = type_name (xusertype),
'Length'      = convert (int, length),
'Allow Nulls'= case when isnullable = 0 then 'No' else 'Yes' end
From syscolumns A, sysobjects B
Where A.id=B.id and B.type ='U' and A. number=0 and B.Status > 0 
Order by b.name, colid

*********************************************************