[数据库字典]简单的3个SQL视图搞定所有SqlServer数据库字典

(2007-11-29更新)网上有很多SQL SERVER数据库字典的SQL语句,七零八落,我在工作整理了一下思路,总结SQL代码如下。数据库字典包括表结构(分2K和2005)、 索引和主键.外键.约束.视图.函数.存储过程.触发器.规则。可以在企业管理器、查询分析器中简单执行,直接了当的查出SQL2K及SQL2005的所有数据字典,方便文档的编写,希望对大家有帮助。

1. SqlServer2000数据库字典--表结构.sql
SELECT   TOP   100   PERCENT   -- a.id, 
       CASE   WHEN  a.colorder  =   1   THEN  d.name  ELSE   ''   END   AS  表名, 
      
CASE   WHEN  a.colorder  =   1   THEN   isnull (f.value,  '' ELSE   ''   END   AS  表说明, 
      a.colorder 
AS  字段序号, a.name  AS  字段名,  CASE   WHEN   COLUMNPROPERTY (a.id, 
      a.name, 
' IsIdentity ' =   1   THEN   ' '   ELSE   ''   END   AS  标识, 
      
CASE   WHEN   EXISTS
          (
SELECT   1
         
FROM  dbo.sysindexes si  INNER   JOIN
               dbo.sysindexkeys sik 
ON  si.id  =  sik.id  AND  si.indid  =  sik.indid  INNER   JOIN
               dbo.syscolumns sc 
ON  sc.id  =  sik.id  AND  sc.colid  =  sik.colid  INNER   JOIN
               dbo.sysobjects so 
ON  so.name  =  si.name  AND  so.xtype  =   ' PK '
         
WHERE  sc.id  =  a.id  AND  sc.colid  =  a.colid)  THEN   ' '   ELSE   ''   END   AS  主键, 
      b.name 
AS  类型, a.length  AS  长度,  COLUMNPROPERTY (a.id, a.name,  ' PRECISION '
      
AS  精度,  ISNULL ( COLUMNPROPERTY (a.id, a.name,  ' Scale ' ),  0 AS  小数位数, 
      
CASE   WHEN  a.isnullable  =   1   THEN   ' '   ELSE   ''   END   AS  允许空,  ISNULL (e. text ''
      
AS  默认值,  ISNULL (g. [ value ] '' AS  字段说明, d.crdate  AS  创建时间, 
      
CASE   WHEN  a.colorder  =   1   THEN  d.refdate  ELSE   NULL   END   AS  更改时间
FROM  dbo.syscolumns a  LEFT   OUTER   JOIN
      dbo.systypes b 
ON  a.xtype  =  b.xusertype  INNER   JOIN
      dbo.sysobjects d 
ON  a.id  =  d.id  AND  d.xtype  =   ' U '   AND  
      d.status 
>=   0   LEFT   OUTER   JOIN
      dbo.syscomments e 
ON  a.cdefault  =  e.id  LEFT   OUTER   JOIN
      dbo.sysproperties g 
ON  a.id  =  g.id  AND  a.colid  =  g.smallid  AND  
      g.name 
=   ' MS_Description '   LEFT   OUTER   JOIN
      dbo.sysproperties f 
ON  d.id  =  f.id  AND  f.smallid  =   0   AND  
      f.name 
=   ' MS_Description '
ORDER   BY  d.name, a.colorder

    SqlServer2005数据库字典--表结构.sql
SELECT   TOP   100   PERCENT   -- a.id, 
       CASE   WHEN  a.colorder  =   1   THEN  d.name  ELSE   ''   END   AS  表名, 
      
CASE   WHEN  a.colorder  =   1   THEN   isnull (f.value,  '' ELSE   ''   END   AS  表说明, 
      a.colorder 
AS  字段序号, a.name  AS  字段名,  CASE   WHEN   COLUMNPROPERTY (a.id, 
      a.name, 
' IsIdentity ' =   1   THEN   ' '   ELSE   ''   END   AS  标识, 
      
CASE   WHEN   EXISTS
          (
SELECT   1
         
FROM  dbo.sysindexes si  INNER   JOIN
               dbo.sysindexkeys sik 
ON  si.id  =  sik.id  AND  si.indid  =  sik.indid  INNER   JOIN
               dbo.syscolumns sc 
ON  sc.id  =  sik.id  AND  sc.colid  =  sik.colid  INNER   JOIN
               dbo.sysobjects so 
ON  so.name  =  si.name  AND  so.xtype  =   ' PK '
         
WHERE  sc.id  =  a.id  AND  sc.colid  =  a.colid)  THEN   ' '   ELSE   ''   END   AS  主键, 
      b.name 
AS  类型, a.length  AS  长度,  COLUMNPROPERTY (a.id, a.name,  ' PRECISION '
      
AS  精度,  ISNULL ( COLUMNPROPERTY (a.id, a.name,  ' Scale ' ),  0 AS  小数位数, 
      
CASE   WHEN  a.isnullable  =   1   THEN   ' '   ELSE   ''   END   AS  允许空,  ISNULL (e. text ''
      
AS  默认值,  ISNULL (g. [ value ] '' AS  字段说明, d.crdate  AS  创建时间, 
      
CASE   WHEN  a.colorder  =   1   THEN  d.refdate  ELSE   NULL   END   AS  更改时间
FROM  dbo.syscolumns a  LEFT   OUTER   JOIN
      dbo.systypes b 
ON  a.xtype  =  b.xusertype  INNER   JOIN
      dbo.sysobjects d 
ON  a.id  =  d.id  AND  d.xtype  =   ' U '   AND  
      d.status 
>=   0   LEFT   OUTER   JOIN
      dbo.syscomments e 
ON  a.cdefault  =  e.id  LEFT   OUTER   JOIN
      sys.extended_properties g 
ON  a.id  =  g.major_id  AND  a.colid  =  g.minor_id  AND  
      g.name 
=   ' MS_Description '   LEFT   OUTER   JOIN
      sys.extended_properties f 
ON  d.id  =  f.major_id  AND  f.minor_id  =   0   AND  
      f.name 
=   ' MS_Description '
ORDER   BY  d.name, 字段序号

2. SqlServer数据库字典--索引.sql
SELECT   TOP   100   PERCENT   -- a.id, 
       CASE   WHEN  b.keyno  =   1   THEN  c.name  ELSE   ''   END   AS  表名, 
      
CASE   WHEN  b.keyno  =   1   THEN  a.name  ELSE   ''   END   AS  索引名称, d.name  AS  列名, 
      b.keyno 
AS  索引顺序,  CASE  indexkey_property(c.id, b.indid, b.keyno,  ' isdescending '
      
WHEN   1   THEN   ' 降序 '   WHEN   0   THEN   ' 升序 '   END   AS  排序,  CASE   WHEN  p.id  IS   NULL  
      
THEN   ''   ELSE   ' '   END   AS  主键,  CASE   INDEXPROPERTY (c.id, a.name,  ' IsClustered '
      
WHEN   1   THEN   ' '   WHEN   0   THEN   ''   END   AS  聚集,  CASE   INDEXPROPERTY (c.id, 
      a.name, 
' IsUnique ' WHEN   1   THEN   ' '   WHEN   0   THEN   ''   END   AS  唯一, 
      
CASE   WHEN  e.id  IS   NULL   THEN   ''   ELSE   ' '   END   AS  唯一约束, 
      a.OrigFillFactor 
AS  填充因子, c.crdate  AS  创建时间, c.refdate  AS  更改时间
FROM  dbo.sysindexes a  INNER   JOIN
      dbo.sysindexkeys b 
ON  a.id  =  b.id  AND  a.indid  =  b.indid  INNER   JOIN
      dbo.syscolumns d 
ON  b.id  =  d.id  AND  b.colid  =  d.colid  INNER   JOIN
      dbo.sysobjects c 
ON  a.id  =  c.id  AND  c.xtype  =   ' U '   LEFT   OUTER   JOIN
      dbo.sysobjects e 
ON  e.name  =  a.name  AND  e.xtype  =   ' UQ '   LEFT   OUTER   JOIN
      dbo.sysobjects p 
ON  p.name  =  a.name  AND  p.xtype  =   ' PK '
WHERE  ( OBJECTPROPERTY (a.id, N ' IsUserTable ' =   1 AND  ( OBJECTPROPERTY (a.id, 
      N
' IsMSShipped ' =   0 AND  ( INDEXPROPERTY (a.id, a.name,  ' IsAutoStatistics ' =   0 )
ORDER   BY  c.name, a.name, b.keyno

3. SqlServer数据库字典--表.视图.函数.存储过程.触发器.主键.外键.约束.规则.sql
SELECT   DISTINCT  
      
TOP   100   PERCENT   isnull (p.name, '' AS  父对象, o.xtype, 
      
CASE  o.xtype  WHEN   ' C '   THEN   ' CHECK 约束 '   WHEN   ' D '   THEN   ' 默认值或DEFAULT约束 '
       
WHEN   ' F '   THEN   ' FOREIGNKEY约束 '   WHEN   ' L '   THEN   ' 日志 '   WHEN   ' FN '   THEN   ' 标量函数 '
       
WHEN   ' IF '   THEN   ' 内嵌表函数 '   WHEN   ' P '   THEN   ' 存储过程 '   WHEN   ' PK '   THEN   ' PRIMARYKEY约束 '
       
WHEN   ' RF '   THEN   ' 复制筛选存储过程 '   WHEN   ' S '   THEN   ' 系统表 '   WHEN   ' TF '   THEN   ' 表函数 '
       
WHEN   ' TR '   THEN   ' 触发器 '   WHEN   ' U '   THEN   ' 用户表 '   WHEN   ' UQ '   THEN   ' UNIQUE 约束 '
       
WHEN   ' V '   THEN   ' 视图 '   WHEN   ' X '   THEN   ' 扩展存储过程 '   WHEN   ' R '   THEN   ' 规则 '   ELSE   NULL
       
END   AS  类型, o.name  AS  对象名, o.crdate  AS  创建时间, o.refdate  AS  更改时间, 
      c.
text   AS  声明语句, OBJECTPROPERTY (o.id, N ' IsMSShipped ' )
FROM  dbo.sysobjects o  Left   JOIN
      dbo.sysobjects p 
ON  o.parent_obj  =  p.id  LEFT   OUTER   JOIN
      dbo.syscomments c 
ON  o.id  =  c.id
WHERE   -- (o.xtype IN ('C','D','F','PK','UQ','L','FN','IF','TF','TR','P','R','RF','X','S','U','V')) AND 
      ( OBJECTPROPERTY (o.id, N ' IsMSShipped ' =   0 AND  ( isnull (p.name, '' <>  N ' dtproperties ' )
ORDER   BY  o.xtype  DESC


数据库技术就是一坛陈年老酒,越久越香,学以致用。

posted on 2007-11-09 11:13 简单 阅读(4669) 评论(32)  编辑 收藏 网摘 所属分类: SQLSERVER.Net开发

评论

 221.226.124.*         

有帮助!记下了,多谢!
2007-11-09 11:52 |

            

整理的好,学习先
2007-11-09 12:08 |  

            

用infomation schema系统视图就可以
2007-11-09 12:10 |  

            

不错。楼主辛苦了、
值得学习、参考。
2007-11-09 12:21 |  

 203.187.164.*         

第三个 有问题:

报错信息:

Server: Msg 1540, Level 16, State 1, Line 1
Cannot sort a row of size 8110, which is greater than the allowable maximum of 8094.
2007-11-09 12:33 |

 [楼主]           

在企业管理器或查询分析器中应该都可以成功执行,代码没有问题。
5楼的错误信息在于字典数据太多,超过8094条记录的排序限制,可以取消排序代码再试一下:
SELECT DISTINCT
o.xtype,
CASE o.xtype WHEN 'X' THEN '扩展存储过程' WHEN 'TR' THEN '触发器' WHEN 'PK' THEN
'主键' WHEN 'F' THEN '外键' WHEN 'C' THEN '约束' WHEN 'V' THEN '视图' WHEN 'FN'
THEN '函数-标量' WHEN 'IF' THEN '函数-内嵌' WHEN 'TF' THEN '函数-表值' ELSE '存储过程'
END AS 类型, o.name AS 对象名, o.crdate AS 创建时间, o.refdate AS 更改时间,
c.text AS 声明语句
FROM dbo.sysobjects o LEFT OUTER JOIN
dbo.syscomments c ON o.id = c.id
WHERE (o.xtype IN ('X', 'TR', 'C', 'V', 'F', 'IF', 'TF', 'FN', 'P', 'PK')) AND
(OBJECTPROPERTY(o.id, N'IsMSShipped') = 0)
2007-11-09 13:26 |  

            

不错 学习了。。。
2007-11-09 14:13 |  

 220.164.103.*         

记下了,谢谢!
2007-11-09 15:11 |

            

在2005中第一个个不能成功
对象名 'dbo.sysproperties' 无效。
2007-11-09 15:18 |  

            

经在sql server 2005上测试,
只要将一个SQL的最后两行替换如下,即可正确运行.
dbo.dtproperties g ON a.id = g.id AND a.colid = g.objectid LEFT OUTER JOIN

dbo.dtproperties f ON d.id = f.id AND f.objectid = 0
2007-11-09 15:27 |  

            

呵呵,不错收藏备用
2007-11-09 15:54 |  

 [楼主]           

感谢大家的捧场,dbo.sysproperties和dbo.dtproperties两个对象在SQL2005中都不存在,10楼兄台真测试通过吗?
SQL2005中的sys.extended_properties对象可以得到表和字段的说明(描述)。

可以用下面的SQL来在SQL2005中查询表字典,已测试通过:
SELECT TOP 100 PERCENT --a.id,
CASE WHEN a.colorder = 1 THEN d.name ELSE '' END AS 表名,
CASE WHEN a.colorder = 1 THEN isnull(f.value, '') ELSE '' END AS 表说明,
a.colorder AS 字段序号, a.name AS 字段名, CASE WHEN COLUMNPROPERTY(a.id,
a.name, 'IsIdentity') = 1 THEN '√' ELSE '' END AS 标识,
CASE WHEN EXISTS
(SELECT 1
FROM dbo.sysindexes si INNER JOIN
dbo.sysindexkeys sik ON si.id = sik.id AND si.indid = sik.indid INNER JOIN
dbo.syscolumns sc ON sc.id = sik.id AND sc.colid = sik.colid INNER JOIN
dbo.sysobjects so ON so.name = so.name AND so.xtype = 'PK'
WHERE sc.id = a.id AND sc.colid = a.colid) THEN '√' ELSE '' END AS 主键,
b.name AS 类型, a.length AS 长度, COLUMNPROPERTY(a.id, a.name, 'PRECISION')
AS 精度, ISNULL(COLUMNPROPERTY(a.id, a.name, 'Scale'), 0) AS 小数位数,
CASE WHEN a.isnullable = 1 THEN '√' ELSE '' END AS 允许空, ISNULL(e.text, '')
AS 默认值, ISNULL(g.[value], '') AS 字段说明, d.crdate AS 创建时间,
CASE WHEN a.colorder = 1 THEN d.refdate ELSE NULL END AS 更改时间
FROM dbo.syscolumns a LEFT OUTER JOIN
dbo.systypes b ON a.xtype = b.xusertype INNER JOIN
dbo.sysobjects d ON a.id = d.id AND d.xtype = 'U' AND
d.status >= 0 LEFT OUTER JOIN
dbo.syscomments e ON a.cdefault = e.id LEFT OUTER JOIN
sys.extended_properties g ON a.id = g.major_id AND a.colid = g.minor_id LEFT OUTER JOIN
sys.extended_properties f ON d.id = f.major_id AND f.minor_id = 0
ORDER BY d.name, a.colorder
2007-11-09 16:03 |  

            

好东西

懒人的福音
2007-11-09 17:35 |  

            

我记得我写了一个回复了,怎么找不到了。
2007-11-09 21:37 |  

            

有用!
2007-11-10 08:47 |  

            

收了,谢谢博主.
2007-11-12 18:19 |  

 222.68.147.*         

精典之作,感激不尽!
2007-11-13 10:25 |

 [楼主]           

很高兴能得到大家的支持和肯定。

今天发现并修正了“表结构.sql”的部分错误,正文已修改。
1.
dbo.sysobjects so ON so.name = so.name AND so.xtype = 'PK'
改为
dbo.sysobjects so ON so.name = si.name AND so.xtype = 'PK'

2.
dbo.sysproperties g ON a.id = g.id AND a.colid = g.smallid LEFT OUTER JOIN
dbo.sysproperties f ON d.id = f.id AND f.smallid = 0
改为
dbo.sysproperties g ON a.id = g.id AND a.colid = g.smallid AND
g.name = 'MS_Description' LEFT OUTER JOIN
dbo.sysproperties f ON d.id = f.id AND f.smallid = 0 AND
f.name = 'MS_Description'

3.
sys.extended_properties g ON a.id = g.major_id AND a.colid = g.minor_id LEFT OUTER JOIN
sys.extended_properties f ON d.id = f.major_id AND f.minor_id = 0
改为
sys.extended_properties g ON a.id = g.major_id AND a.colid = g.minor_id AND
g.name = 'MS_Description' LEFT OUTER JOIN
sys.extended_properties f ON d.id = f.major_id AND f.minor_id = 0 AND
f.name = 'MS_Description'
2007-11-14 10:51 |  

 124.243.195.*         

请教大家个问题,数据库字段名和表名全都设计成大写和全是小写在执行的时候,性能有差别吗?因为我们公司有人说吧数据库字段全设计成大写会提高执行速度,是这样的吗?
2007-11-15 17:49 |

 [楼主]           

答复19楼兄台的问题,
SQL是否区别大小写与SQL排序规则有关,可以在数据库实例、数据库、用户对象三个层次上设置SQL排序规则,后者覆盖前者的设置,SQL排序规则字符串中CI 指定不区分大小写,CS 指定区分大小写。所以我们通常的设置是不区分大小写,不会影响执行速度。
2007-11-29 15:11 |  

 [楼主]           

今天更新了主贴的内容“3.SqlServer数据库字典--表.视图.函数.存储过程.触发器.主键.外键.约束.规则.sql”,包括了规则在内的所有用户对象,除了索引之外,所有用户对象皆存在于dbo.sysobjects中。
2007-11-29 15:13 |  

            

载走了


2007-12-11 15:29 |  

            

mark
2007-12-27 16:07 |  

 218.66.159.*         

好東西,謝謝樓主分享
2008-01-15 08:31 |

 219.238.217.*         

好 ,收藏!期待楼主其他文章
2008-03-05 12:57 |

 222.180.192.*         

不错哦
2008-04-03 08:28 |

 61.178.78.*         

谢谢楼主,我工作时间用到你的这篇文章了,。
2008-06-17 23:59 |

            

好东西,收藏了
2008-08-16 13:26 |  

            

非常感谢!
不过,应该过滤系统表,只显示用户表就足够了,一般不会用到系统表的吧
2008-09-04 15:56 |  

 221.220.113.*         

强大!学习!
 
转自:

转载于:https://www.cnblogs.com/qiantuwuliang/archive/2009/06/06/1497372.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值