今天接到一项任务,需要将数据库存储过程取出来,并要求取出相对应得存储过程注释。
取出数据库存储过程SQL语句如下:
select o.[name], c.text, c.encrypted, c.number, xtype=convert(nchar(2), o.xtype),
datalength(c.text), convert(varbinary(8000), c.text),
0 from dbo.syscomments c, dbo.sysobjects o
where o.id = c.id and o.xtype = 'p' and o.[NAME] NOT LIKE 'sp_%' order by name
但是,text字段中有些字符是不需要的。譬如:
-- =============================================
-- 作者: XX
-- 创建日期: 2011.5.11
-- 描述: 取得订单信息[public_GetOrderInfo]
-- =============================================
CREATE PROCEDURE [dbo].[public_GetOrderInfo] .......
只要字符,“
取得订单信息”。
写了一个函数,简单处理了一下!将存储过程里面,取出注释部分,即(从索引1开始,到 "CREATE" 字符的索引)。将里面的字符之类的过滤掉,剩下的中文就是注释了。简单的一个思路,实现的比较粗糙。不过,就是一个展示用。无伤大雅......
IF OBJECT_ID('ReplEng') IS NOT NULL
DROP FUNCTION ReplEng
GO
CREATE FUNCTION ReplEng
(
@CONTENT VARCHAR(MAX)
)
RETURNS NVARCHAR(MAX)
AS
BEGIN
DECLARE @ALLLength INT --总长度
DECLARE @NewWord NVARCHAR(MAX)--新字符串
DECLARE @EndIndex INT --结束字符索引
SET @NewWord=''
SET @EndIndex=charindex('create',@CONTENT) --取出CREATE 字符的索引
SET @CONTENT=SUBSTRING(@CONTENT,1,@EndIndex)
SET @ALLLength=LEN(@CONTENT) --获取总长度
WHILE(@ALLLength>0)
BEGIN
DECLARE @LEN INT
SET @LEN=0
SET @LEN=DATALENGTH(SUBSTRING(@CONTENT,1,1))
IF(@LEN=2) --如果是中文,叠加字符串
BEGIN
SET @NewWord=@NewWord+SUBSTRING(@CONTENT,1,1)
END
SET @CONTENT=SUBSTRING(@CONTENT,2,LEN(@CONTENT)-1) --替换字符
SET @ALLLength=LEN(@CONTENT)
END
SET @NewWord=REPLACE(@NewWord,'作者XX创建日期描述','')
RETURN @NewWord
END
go
再加上函数,用SQL语句调用一下。看到结果你会很兴奋。
--存储过程:
select [name]+':'+dbo.ReplEng(c.text),c.text, c.encrypted, c.number,
xtype=convert(nchar(2), o.xtype),
datalength(c.text), convert(varbinary(8000), c.text),
0 from dbo.syscomments c, dbo.sysobjects o
where o.id = c.id and o.xtype = 'p' and o.[NAME] NOT LIKE 'sp_%' order by name