存储过程替换text,ntext列中的字符串

2003-12-1 7:52:00　　作者：mbsky　　来源：未知　网友评论 0 条　论坛

　　/* 
author:amjn 
date:2003-03-28 
version:1.0 
function:替换text,ntext列中的字符串(不支持中文) 
*/ 
declare @ptr varbinary(16) 
declare @amjnId int 
declare @Position int,@len int 
set @len=datalength('ILOVEHJL')　　 
declare wux_Cursor scroll Cursor 
for 
select textptr([Name]),[amjnId] from USA201 
for read only 
open wux_Cursor 
fetch next from wux_Cursor into @ptr,@amjnId 
while @@fetch_status=0 
begin 
　　select @Position=patindex('%ILOVEHJL%',[Name]) from USA201 where [amjnId]=@amjnId 
　　while @Position>0 
　　begin 
　　　　set @Position=@Position-1 
　　　　updatetext USA201.[Name] @ptr @Position @len 'i love hjl' 
　　　　select @Position=patindex('%ILOVEHJL%',[Name]) from USA201 where [amjnId]=@amjnId 
　　end 
　　fetch next from wux_Cursor into @ptr,@amjnId 
end 
close wux_cursor 
deallocate wux_cursor 
go

>> 相关文章