Find strings in text of stored procedures

Ussualy this kind of scripts queries sysobjects and syscomments like this:select distinct object_name(O.id)from syscomments as Cjoin sysobjects as O on O.id = C.id and o.type = 'P' -- search string only in stored procedureswhere C.text like '%insert into MyTable%'When the text of stored procedures, triggers, functions is over 4000 characters, it is saved in syscomments […]