SQL 2000對text類型的處理(分類相加字串)

/*

附上可對ntext,text,image操作的sql2000 function

datalength,readtext,patindex,

set textsize,substring,updatetext,textptr,writetext,textvalid

以下是對text類型欄位的“字串相加”,方法不好.......

----2007.11.30  by  playwarcraft----

*/

 create table T(id int,col text)
insert into T select 1, 'edf'
insert into T select 1, 'ghi'
insert into T select 2, 'zysop##***'
insert into T select 1,'HHH'
insert into T select 2,'KKK'
GO

create table #t1(id int,col text)
create table #t2(id int,col text)

declare @t table (col varchar(8000))
declare @id int, @n int,@i int ,@p binary(16),@len int, @col varchar(8000)
select @n=max(datalength(col))/8000+1 from T
declare c1 cursor for
  select distinct id from T
open c1
fetch next from c1 into @id
while @@fetch_status=0
BEGIN
 
 set @i=0
 while @n>@i
 begin
    insert into @t  select   substring(col,(@i)*8000,8000)  from T where 
id=@id
    set @i=@i+1
 end

                   insert into #t1 select @id,''
                    declare c2 cursor for 
                          select col from @t where col<>''
                     open c2
                     fetch next from c2 into @col
 while @@fetch_status=0
 begin
    select @p=textptr(col),@len=datalength(col) from #t1
                      updatetext #t1.col @p @len 0 @col
                      fetch next from c2 into @col
 end
 close c2
 deallocate c2

 insert into #t2 select * from #t1
 truncate table #t1
                   delete @t
fetch next from c1 into @id
                
END
close c1
deallocate c1
GO

select * from #t2

/*

id            col

------------------------------

1          edfghiHHH
2          zysop##***KKK

*/

GO
drop table T,#t1,#t2

阅读更多
想对作者说点什么? 我来说一句

c# WinForm圖片處理程序源代碼

2008年08月27日 159KB 下载

圖像處理程序(多種功能)

2008年11月27日 252KB 下载

經典批處理 經典批處理

2008年11月07日 386KB 下载

ch04_二值化影像處理與分析.pdf

2015年05月25日 3.77MB 下载

最新系統簽核流程類源碼

2017年11月17日 103.93MB 下载

没有更多推荐了,返回首页

不良信息举报

SQL 2000對text類型的處理(分類相加字串)

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭