GO  

SELECT obj.Name 存储过程名, sc.TEXT 存储过程内容  

FROM syscomments sc  

INNER JOIN sysobjects obj ON sc.Id = obj.ID  

WHERE sc.TEXT LIKE '%' + 'ShortMessage' + '%'  

AND TYPE = 'P'  

GO