MS SQL : List all tables and columns

SELECT   SysObjects.[Name] as TableName,       SysColumns.[Name] as ColumnName,       SysTypes.[Name] As DataType,       SysColumns.[Length] As Length   FROM       SysObjects INNER JOIN SysColumns   ON SysObjects.[Id] = SysColumns.[Id]       INNER JOIN SysTypes  ON SysTypes.[xtype] = SysColumns.[xtype]  WHERE  SysObjects.[type] = 'U' and SysColumns.name like '%ap%' ORDER BY  SysObjects.[Name]