程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> .NET網頁編程 >> ASP.NET >> 關於ASP.NET >> 存儲過程實現無限級分類(1)

存儲過程實現無限級分類(1)

編輯:關於ASP.NET

在做考題的的時候,涉及到分類,雖然不是無限級的,但是,為了以後擴展用,想做成無限級,在網上找找了,一個用存儲過程作的,雖然添加,編輯,移動,用的是存儲過程,可是在讀出來的時候只用了一條Select 語句,感覺挺爽的,下面我把存儲過程列出來,我只用到了添加,編輯,沒有用到移動。

1,表結構

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

表結構:
表名:Tb_Column
表結構(所有字段非空):
Column_ID     int 主鍵(注:非標識)
Column_Name   nvarchar(50)分類名稱
Parent_ID     int 父分類ID(默認值0)
Column_Path   nvarchar(1000) 分類路徑
Column_Depth  int分類深度(默認值0)
Column_Order  int排序(默認值0)
Column_Intro  nvarchar(1000)分類說明

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

2.添加的存儲過程

CREATE PROCEDURE sp_Column_Insert
(
@Parent_ID int,
@Column_Name nvarchar(50),
@Column_Intro nvarchar(1000)
)
AS
Declare @Err As int
Set @Err=0

Begin Tran
--通過現有記錄獲取欄目ID
Declare @Column_ID As int
Declare @Column_Depth As int
Select @Column_ID = Max(Column_ID) From Tb_Column
IF @Column_ID Is Not Null
Set @Column_ID = @Column_ID+1
Else
Set @Column_ID = 1

--判斷是否是頂級欄目,設置其Column_Path和Column_Order
Declare @Column_Path As nvarchar(1000)
Declare @Column_Order As int
IF @Parent_ID = 0
Begin
Set @Column_Path =Ltrim(Str(@Column_ID))
Select @Column_Order = Max(Column_Order) From Tb_Column
IF @Column_Order Is Not Null
Set @Column_Order = @Column_Order + 1
Else --如果沒有查詢到記錄,說明這是第一條記錄
Set @Column_Order = 1

--深度
Set @Column_Depth = 1
End
Else
Begin
--獲取父節點的路徑和深度
Select @Column_Path = Column_Path ,@Column_Depth = Column_Depth From Tb_Column Where

Column_ID=@Parent_ID
IF @Column_Path Is Null
Begin
Set @Err = 1
Goto theEnd
End

--獲取同父節點下的最大序號
Select @Column_Order = Max(Column_Order) From Tb_PicColumn Where Column_Path like

''+@Column_Path+'|%'  Or Column_ID = @Parent_ID
IF @Column_Order Is Not Null --如果序號存在,那麼將該序號後的所有序號都加1
Begin
--更新當前要插入節點後所有節點的序號
Update Tb_Column Set Column_Order = Column_Order +1 Where Column_Order

>@Column_Order
--同父節點下的最大序號加上1,構成自己的序號
Set @Column_Order = @Column_Order + 1
End
Else
Begin
Set @Err=1
Goto theEnd
End

--父節點的路徑加上自己的ID號,構成自己的路徑
Set @Column_Path = @Column_Path + '|' + Ltrim(Str(@Column_ID))

--深度
Set @Column_Depth = @Column_Depth+1

End

Insert Into Tb_Column(Column_Name,Parent_ID,Column_Path,Column_Depth,Column_Order,Column_Intro)

Values(@Column_Name,@Parent_ID,@Column_Path,@Column_Depth,@Column_Order,@Column_Intro)

IF @@Error<>0
Begin
Set @Err=1
Goto theEnd
End

--更新當前記錄之後的記錄的ORDER
--Update Tb_Column Set Column_Order = Column_Order+1 Where Column_Order  > @Column_Order

theEnd:
IF @Err=0
Begin
Commit Tran
Return @Column_ID
End
Else
Begin
    Rollback Tran
Return 0
End

GO待續.......

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved