导出sql server数据表的详细结构(加强版),加入外键列

 

CREATE VIEW [dbo].[V_TableList]
AS

--SQL2000中應該用：sysproperties换掉代码中的sys.extended_properties

SELECT
表名=d.name,
表说明=isnull(f.value,''),
字段序号=a.colorder,
字段名=a.name,
字段说明=isnull(g.[value],''),
主键=case when exists(SELECT 1 FROM sysobjects where xtype='PK' and parent_obj=a.id and name in (
SELECT name FROM sysindexes WHERE indid in(
SELECT indid FROM sysindexkeys WHERE id = a.id AND colid=a.colid
))) then '√' else '' end,
外键=(case when a.name in
(select name from syscolumns
  where id=object_id(d.name)
        and colid in(select fkey from sysforeignkeys where fkeyid=object_id(d.name))) then '√' else '' end),
外键表=isnull((select distinct o.name from  syscolumns c    --新增的外键表
left outer join sysobjects o on o.id=c.id
left outer join sysforeignkeys f on o.id=f.rkeyid
where  f.fkeyid=object_id(d.name) and f.fkey=a.colorder),''),
外键表列=isnull((select distinct c.name from sysforeignkeys f  --新增的外键列
left outer join sysobjects o on o.id=f.rkeyid
left outer join syscolumns c on c.id =o.id and f.rkey=c.colorder
where f.fkeyid=object_id(d.name) and f.fkey=a.colorder ),''),
类型=b.name,
占用字节数=a.length,
长度=COLUMNPROPERTY(a.id,a.name,'PRECISION'),
小数位数=isnull(COLUMNPROPERTY(a.id,a.name,'Scale'),0),
允许空=case when a.isnullable=1 then '√'else '' end,
标识=case when COLUMNPROPERTY( a.id,a.name,'IsIdentity')=1 then '√'else '' end,
默认值=isnull(e.text,'')
--into temptb 　--结果存入临时表
FROM syscolumns a
left join systypes b on a.xusertype=b.xusertype
inner join sysobjects d on a.id=d.id and d.xtype='U' and d.name<>'dtproperties'
left join syscomments e on a.cdefault=e.id
--left join sysproperties g on a.id=g.id and a.colid=g.smallid
--left join sysproperties f on d.id=f.id and f.smallid=0
LEFT   JOIN sys.extended_properties   G  ON  A.ID=G.major_id   AND   A.COLID=G.minor_id    
LEFT   JOIN sys.extended_properties   F  ON  D.ID=F.major_id   AND   F.minor_id=0

where 1=1 and
--and d.name='DP_Cities' --如果只查询指定表,加上此条件
and
(g.[name]='MS_Description' or g.[name] is null)

 

--EOF--