收藏一个SQL,获取sqlsever中一个数据库里所有存储过程或者函数的名字

SELECT   DISTINCT  

TOP   100   PERCENT  o.xtype, 

CASE  o.xtype  WHEN   ' X '   THEN  N ' 扩展存储过程 '   WHEN   ' TR '   THEN  N ' 触发器 '   WHEN   ' PK '   THEN  

N ' 主键 '   WHEN   ' F '   THEN  N ' 外键 '   WHEN   ' C '   THEN  N ' 约束 '   WHEN   ' V '   THEN  N ' 视图 '   WHEN   ' FN '  

THEN  N ' 函数-标量 '   WHEN   ' IF '   THEN  N ' 函数-内嵌 '   WHEN   ' TF '   THEN  N ' 函数-表值 '   ELSE  N ' 存储过程 '  

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 ) 

ORDER   BY   CASE  o.xtype  WHEN   ' X '   THEN  N ' 扩展存储过程 '   WHEN   ' TR '   THEN  N ' 触发器 '   WHEN  

' PK '   THEN  N ' 主键 '   WHEN   ' F '   THEN  N ' 外键 '   WHEN   ' C '   THEN  N ' 约束 '   WHEN   ' V '   THEN  N ' 视图 '  

WHEN   ' FN '   THEN  N ' 函数-标量 '   WHEN   ' IF '   THEN  N ' 函数-内嵌 '   WHEN   ' TF '   THEN  N ' 函数-表值 '  

ELSE  N ' 存储过程 '   END   DESC

 功能不错的说...呵呵,原贴地址如下:

http://topic.csdn.net/u/20071228/10/05d4a440-88f5-4130-a96b-6f6df24477e1.html?seed=784687067