sql2005,替换所有表中所有字段的值,(一把双刃剑)

创建这两个存储过程，然后运行最后的sql语句。

 

Create proc ReplaceKeyWord
@old nvarchar(100),
@new nvarchar(100)
as
declare @sql nvarchar(1000)
set @sql=N' 
declare   @s   nvarchar(4000),@tbname   sysname 
select   @s=N'''',@tbname=N''?'' 
select   @s=@s+N'',''+quotename(a.name)+N''=replace(''+quotename(a.name)+N'',N'''''+@old+''''',N'''''+@new+''''')'' 
from   syscolumns   a,systypes   b 
where   a.id=object_id(@tbname)   
and   a.xusertype=b.xusertype 
and   b.name   like   N''%char'' 
if   @@rowcount>0 
begin 
set   @s=stuff(@s,1,1,N'''') 
exec(N''update   ''+@tbname+''   set   ''+@s) 
end '
--print @sql
exec   sp_msforeachtable   @sql;

set @sql=N' 
declare   @s   nvarchar(4000),@tbname   sysname 
select   @s=N'''',@tbname=N''?'' 
select   @s=@s+quotename(a.name)+N'',''
from   syscolumns   a,systypes   b 
where   a.id=object_id(@tbname)   
and   a.xusertype=b.xusertype 
and   b.name   like   N''%text''
 if   @@rowcount>0 
begin 
exec UpdateTextColumn @tbname,@s,'''+@old+''','''+@new+'''
end
' ;
exec   sp_msforeachtable @sql
go

 

 

==================================================================

 

Create proc UpdateTextColumn
 @Table varchar(100),
 @Columns varchar(200),
 @old varchar(100),
 @new varchar(100)
 as
     set nocount on
     declare @sql nvarchar(2000)
     declare @Column varchar(50)
    declare @cpos int,@npos int
    declare @curoffset int
    set @cpos=1;
    set @npos=1;
    set @npos=charindex(',',@Columns,@cpos);
    set @curoffset=0;

   --------------------
   -- www.uiok.net
   --------------------

    while(@npos>0)
    begin
        set @Column = substring(@Columns,@cpos,@npos-@cpos);
        set @cpos = @npos+1
        set @npos=charindex(',',@Columns,@cpos);
       
        set @sql = 'update '+@Table+' set '+@Column+'=replace(cast('+@Column+' as varchar(8000)),@old,@new) where Datalength('+@Column+')<=8000';
        EXECUTE sp_executesql @Sql,
                           N'@old varchar(100),@new varchar(100)',
                           @old,
                           @new
        declare @ptr binary(16) ,@offset int,@dellen int
       
        set @dellen = len(@old)
       
        set @offset = 1
        while @offset>=1
        begin
            if @curoffset<>0
               set @curoffset=@offset;
            set @offset = 0
            set @sql = 'select     top 1 @offset = PATINDEX(''%'+@old+'%'' , '+@Column+'), @ptr = textptr('+@Column+') from '+@Table+' where Datalength('+@Column+')>8000 and

'+@Column+' like ''%'+@old+'%''';
            EXEC sp_executesql @Sql,N'@offset int OUTPUT,@ptr binary(16) OUTPUT,@old varchar(100),@curoffset int',
                               @offset OUTPUT,@ptr OUTPUT,@old,@curoffset;

           if (@offset is not null) and (@offset > 0)
            begin
                set @offset = @offset-1

                set @sql='updatetext '+@Table+'.'+@Column+' @ptr @offset @dellen @new';
                EXEC sp_executesql @Sql,N'@offset int ,@ptr binary(16),@dellen int,@new varchar(100)',@offset,@ptr,@dellen,@new;
            end
        end
end

 

Exec ReplaceKeyWord '被替换的字符串','要替换的字符串'