TreeViewの追加方法について教えて下さい�A

url   |no|title   | 

------+--+--------+ 

a.aspx|0 |ねじ 

b.aspx|1 |5mm*10mm 

表示したいツリー構造　インデント　　　通し番号　　親ノード

□ネジ　　　　　　　　０　　　　　　　　１００

　▲５ｍｍ　　　　　　０?０　　　　　　１０１　　１００

　▲１０ｍｍ　　　　　０?１　　　　　　１０２　　１００

　▲１５ｍｍ　　　　　０?２　　　　　　１０３　　１００

□逆ネジ　　　　　　　１　　　　　　　　１０４

　▲５ｍｍ　　　　　　１?０　　　　　　１０５　　１０４

　▲１０ｍｍ　　　　　１?１　　　　　　１０６　　１０４

　▲１５ｍｍ　　　　　１?２　　　　　　１０７　　１０４

□ナット　　　　　　　２　　　　　　　　１０８

　□普通のナット　　　２?１　　　　　　１０９　　１０８

　　▲５ｍｍ　　　　　　　１?０　　　　１１０　　１０９

　　▲１０ｍｍ　　　　　　１?１　　　　１１１　　１０９

　　▲１５ｍｍ　　　　　　１?２　　　　１１２　　１０９

　□袋ナット　　　　　２?２　　　　　　１１３　　１０８

　　▲５ｍｍ　　　　　　　２?０　　　　１１４　　１１３

　　▲１０ｍｍ　　　　　　２?１　　　　１１５　　１１３

　　▲１５ｍｍ　　　　　　２?２　　　　１１６　　１１３

□ワッシャ　　　　　　３　　　　　　　　１１７

　□スプリング　　　　３?１　　　　　　１１８　　１１７

　□サラ　　　　　　　３?２　　　　　　１１９　　１１７



親ノードを持ってないノードがルートです。



これをSQLで書くと

親：select * from TreeTable where 親ノード='' order by 通し番号



　　親ノード数分ループする。



子：select * from TreeTable where 親ノード=親[x] order by 通し番号



　　子のノード数分ループする。





子の子（つまり、子の親だから　これも親）．．．select が失敗するまで続ける

ということはつまり、ネストの最深部まで辿る、ということ。



２つのSQL文の違いを良く見ると、

親ノード=''

と

親ノード=親[x]

だけですね。

ってことは、右辺を再帰メソッドのパラメータとして渡してあげれば２つのループを

共通化できますね。

//ダミーの親ノードを確保このノードの子全てがツリービューに表示される

//項目となる。

private root as new TreeNode()



private sub CreateTree(parent as TreeNode, nodeId as Integer)

  //SQL 初期化処理

  // select * from TreeTable where 親ノード=:nodeId order by 通し番号

  //

  while reader.read = true

  

     //親ノード作成

     dim node as new TreeNode()

     //親ノード初期化

     

     //今作成した親ノードに対して子を追加する

     CreateTree(node, reader("親ノード") )

     

     parent.add( node )

  

  wend



end sub



protected sub Page_Load(...)



   CreateTree( root, "" ) //最上位階層のノードは "" だから



   for i as integer = 0 to root.items.count - 1

   

       Me.TreeView1.controls.add( root.items(i) )

   

   end

   

end sub