转自：

if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_stuff]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)

drop procedure [dbo].[p_stuff]

GO

/*--Ntext字段处理

模拟字符串处理函数 stuff

完成表中 ntext 字段的 stuff 处理

注意,表中需要有列名为:id 的主键(或标识字段),数据类型为int

如果没有这个主键字段,或者是其他类型,则对应的需要修改存储过程

--邹建 2004.07--*/

/*--调用示例

--测试数据

create table tb(id int identity(1,1),content ntext)

insert tb select 'a;sd'

union all select 'a;sdfkjas2qasdfdfsg45yhjhdfg45645a'

--调用存储过程,将第8~9的字符替换成'中国'

exec p_stuff 'tb','content',8,2,'中国',''

select * from tb

drop table tb

--*/

create proc p_stuff

@tbname sysname,--要处理的表名

@fdname sysname,--text/ntext字段名

@start int=null,--开始位置,NULL表示追加数据

@length int=null,--替换的长度

@str nvarchar(4000),--要插入的字符串

@where nvarchar(1000)=''--要处理的记录的条件

as

if @str is null return

declare @s nvarchar(4000)

set @s='

declare @id int,@ptr varbinary(16),@start1 int

declare tb cursor local for

select id,start=datalength(['+@fdname+'])/2

from ['+@tbname+']

'+case isnull(@where,'') when '' then ''

else ' where end+'

open tb

fetch tb into @id,@start1

while @@fetch_status=0

begin

select @ptr=textptr(content)

from ['+@tbname+']

where

if @start is null or @start1<@start

updatetext ['+@tbname+'].['+@fdname+'] @ptr null null @str

else

begin

set @start1=@start-1

updatetext ['+@tbname+'].['+@fdname+'] @ptr @start1 @length @str

end

fetch tb into @id,@start1

end

close tb

deallocate tb

'

exec sp_executesql @s

,N'@start int,@length int,@str nvarchar(4000)'

,@start,@length,@str

go