将SQLServer中所有表的列信息显示出来

会计考友

　　将SQL Server中所有表的列信息显示出来:
　　SELECT SysObjects.Name as tb_name, SysColumns.Name as col_name,
　　SysTypes.Name as col_type, SysColumns.Length as col_len, isnull
　　(SysProperties.Value,SysColumns.Name) as col_memo,
　　case when SysColumns.name in
. K, F8 S! C) E( f; Z" ~; X　　(select 主键=a.name
. r9 k% a8 x1 _3 H; H) c　　FROM syscolumns a
　　inner join sysobjects b on a.id=b.id and
! K; S" ^/ e9 f6 p　　b.xtype='U' and b.name'dtproperties'
. }8 b: F( ^$ P' F1 I: Z　　where exists(SELECT 1 FROM sysobjects where xtype='PK' and name in (
7 x4 _" m/ \/ d& [8 S　　SELECT name FROM sysindexes WHERE indid in(
　　SELECT indid FROM sysindexkeys WHERE id = a.id AND colid=a.colid
5 ?  Y" M  q% b( Q　　)))
　　and b.name=SysObjects.Name
4 v0 h" P) q2 q　　)
　　then 1 else 0 end as is_key
2 c* F3 l5 x' n. s( W　　FROM SysObjects,SysTypes,SysColumns
　　LEFT JOIN SysProperties ON (Syscolumns.Id = Sysproperties.Id AND
- o/ W$ v! I# s, ?　　Syscolumns.Colid = Sysproperties.Smallid)
0 M: g3 t* m; n; [　　WHERE (Sysobjects.Xtype ='u' OR Sysobjects.Xtype ='v')
　　AND Sysobjects.Id = Syscolumns.Id AND SysTypes.XType = Syscolumns.XType
　　AND SysTypes.Name  'sysname' AND Sysobjects.
9 g8 |9 ]- d; V　　Name Like '%' ORDER By SysObjects.Name, SysColumns.colid