数据生成树

使用存储过程在数据表中生成树 

数据库 Category1表结构

________________________________________

CREATE TABLE [dbo].[Category1](

[id] [int] IDENTITY(1,1) NOT NULL,

[pid] [int] NULL,

[Name] [varchar](100) NULL,

[path] [varchar](255) NULL,

[sort] [varchar](255) NULL,

[isHot] [bit] NULL,

[keywords] [text] NULL,

[description] [text] NULL,

CONSTRAINT [PK_Category_1] PRIMARY KEY CLUSTERED

(

    [id] ASC

)

) ON [PRIMARY] TEXTIMAGE_ON [PRIMARY]

__________________________________________

1.使用存储过程生成 顶级类

Create proc AddTopClass

(

@ID int,

@name varchar(100),

@keyword varchar(255),

@description varchar(255)

)

as

declare @dd int

declare @sort varchar(255)

declare @sort1 int

insert into Category1([name],pid,keywords,[description])values (@name,0,@keyword,@description)--新增顶级类记录

if @@ERROR<>0--判断是否执行

   print 100

else

begin

   select top 1 @dd=id from Category1 order by id desc --将新生成的顶级类记录ID赋值给@dd参数

   if @@rowcount=0

      print 100

   else

      begin

          select @sort=MAX(isnull(sort,'')) from Category1 where pid=0 --顶级类最大的sort

          if @@rowcount=0

               print 100

          else

               begin

               set @sort1=0

               if @sort=''

                    set @sort='01'

               else

                    begin

                         set @sort1=@sort+1

                         if LEN(@sort1)=1

                              set @sort='0'+CONVERT(varchar(255),@sort1)

                         else if LEN(@sort1)=2

                              set @sort=@sort1

                    end

               update Category1 set path=@dd,sort=@sort where id=@dd

               end

     end

end

2 使用存储过程生成 子类

Create proc subclass

(

@ID int,

@name varchar(100),

@keyword varchar(255),

@description varchar(255)

)

as

declare @dd int

declare @sort varchar(255)

declare @sort1 int

declare @sort2 varchar(255)

declare @path varchar(255)

insert into Category1(Name,pid,keywords,[description]) values(@name,@ID,@keyword,@description)

   if @@ERROR<>0

      print 100

   else

      begin

         select top 1 @dd=id from Category1 order by id desc

         if @@rowcount=0

            print 100

         else

            begin

            select @path=[path]+','+ CONVERT(varchar(50),@dd) ,@sort=sort+',' from Category1 where id=@ID

            select @sort2=MAX(isnull(sort,'')) from Category1 where pid=@ID

            if @@rowcount=0

               print 100

            else

              begin

               set @sort1=0

               if @sort2=''

                  set @sort +='01'

               else

                  begin

                     set @sort2=Right(@sort2,2)

                     set @sort1=CONVERT(int, @sort2)

                     set @sort1 += 1

                     if LEN(@sort1)=1

                        set @sort+='0'+CONVERT(varchar(255),@sort1)

                     else if LEN(@sort1)=2

                           set @sort+=@sort1

                  end

               update Category1 set path=@path,sort=@sort where id=@dd

         end

      end

end

删除节点

create  proc deleteCatagory

(@id int)

as

declare @path varchar(500)

if exists (select * from Category1 where id=@id)

begin

select @path=[path] from Category1 where id=@id

delete from Category1 where [path]like ''+@path+'%'

if @@ERROR=0

print 101

else

print 100

end

else

print 100