织梦Dede实现嵌套获取栏目及其子栏目列表

织梦Dede实现嵌套获取栏目及其子栏目列表
因为时间仓促可能有些不成熟 这里只是抛砖引玉了
修改 channerl.lib.php

1. <?php
   
2. function lib_channel(&$ctag,&$refObj)
   
3. {
   
4. global $_sys_globals,$envs,$dsql;
   
5. $attlist = "typeid|0,reid|0,row|100,col|1,type|son,currentstyle|";
   
6. FillAttsDefault($ctag->CAttribute->Items,$attlist);
   
7. extract($ctag->CAttribute->Items, EXTR_SKIP);
   
8. $innertext = $ctag->GetInnerText();
   
9. if(empty($typeid) && $envs['typeid']!=0)
   
10. {
    
11. $typeid = $envs['typeid'];
    
12. $reid = $envs['reid'];
    
13. }else{
    
14. $reid=0;
    
15. }
    
16. 
    
17. if($type==''||$type=='sun') $type="son";
    
18. if($innertext=='') $innertext = GetSysTemplets("channel_list.htm");
    
19. 
    
20. if($reid==0 && $typeid>0)
    
21. {
    
22. $dbrow = $dsql->GetOne("Select reid From dede_arctype where id='$typeid' ");
    
23. if(is_array($dbrow)) $reid = $dbrow['reid'];
    
24. }
    
25. 
    
26. $likeType = '';
    
27. if($type=='top')
    
28. {
    
29. $sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath,description
    
30. From dede_arctype where reid=0 And ishidden<>1 order by sortrank asc limit 0,$row";
    
31. }
    
32. else if($type=="son")
    
33. {
    
34. //if($_sys_globals['typeid']>0) $typeid = $_sys_globals['typeid'];
    
35. if($typeid==0) {
    
36. return '';
    
37. }
    
38. $sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath,description
    
39. From dede_arctype where reid='$typeid' And ishidden<>1 order by sortrank asc limit 0,$row";
    
40. }
    
41. else if($type=="self")
    
42. {
    
43. if($reid==0) {
    
44. return '';
    
45. }
    
46. $sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath,description
    
47. From `dede_arctype` where reid='$reid' And ishidden<>1 order by sortrank asc limit 0,$row";
    
48. }
    
49. //And id<>'$typeid'
    
50. $dtp2 = new DedeTagParse();
    
51. $dtp2->SetNameSpace("field","[","]");
    
52. $dtp2->LoadSource($innertext);
    
53. $dsql2 = clone $dsql;
    
54. $dsql->SetQuery($sql);
    
55. $dsql->Execute();
    
56. 
    
57. $line = $row;
    
58. $GLOBALS['autoindex'] = 0;
    
59. for($i=0;$i < $line;$i++)
    
60. {
    
61. if($col>1) $likeType .= "<dl>\r\n";
    
62. for($j=0;$j<$col;$j++)
    
63. {
    
64. if($col>1) $likeType .= "<dd>\r\n";
    
65. if($row=$dsql->GetArray())
    
66. {
    
67. if($type=='self' && $row['id']==$typeid) //处理同级栏目中，当前栏目的样式
    
68. {
    
69. if($currentstyle!='')
    
70. {
    
71. $linkOkstr = $currentstyle;
    
72. $row['typelink'] = GetOneTypeUrlA($row);
    
73. $linkOkstr = str_replace("~typelink~",$row['typelink'],$linkOkstr);
    
74. $linkOkstr = str_replace("~typename~",$row['typename'],$linkOkstr);
    
75. $likeType .= $linkOkstr;
    
76. }
    
77. }else
    
78. {
    
79. $row['typelink'] = $row['typeurl'] = GetOneTypeUrlA($row);
    
80. if(is_array($dtp2->CTags))
    
81. {
    
82. foreach($dtp2->CTags as $tagid=>$ctag){
    
83. if(isset($row[$ctag->GetName()]))
    
84. {
    
85. $dtp2->Assign($tagid,$row[$ctag->GetName()]);
    
86. }
    
87. elseif ('sonchannel' == $ctag->GetName())
    
88. {
    
89. $dtp2->Assign($tagid,lib_channel_son($ctag,$row['id'],$dsql2));
    
90. }
    
91. }
    
92. }
    
93. $likeType .= $dtp2->GetResult();
    
94. }
    
95. }
    
96. if($col>1) $likeType .= "</dd>\r\n";
    
97. $GLOBALS['autoindex']++;
    
98. }//Loop Col
    
99. if($col>1)
    
100. {
     
101. $i += $col - 1;
     
102. $likeType .= " </dl>\r\n";
     
103. }
     
104. }//Loop for $i
     
105. 
     
106. $dsql->FreeResult();
     
107. return $likeType;
     
108. }
     
109. function lib_channel_son($ctag,$typeid = 0,$dsql2)
     
110. {
     
111. $attlist = "row|100,col|1,currentstyle|";
     
112. FillAttsDefault($ctag->CAttribute->Items,$attlist);
     
113. extract($ctag->CAttribute->Items, EXTR_SKIP);
     
114. $innertext = $ctag->GetInnerText();
     
115. 
     
116. $likeType = '';
     
117. 
     
118. //if($_sys_globals['typeid']>0) $typeid = $_sys_globals['typeid'];
     
119. if($typeid==0) {
     
120. return '';
     
121. }
     
122. $sql = "Select id,typename,typedir,isdefault,ispart,defaultname,namerule2,moresite,siteurl,sitepath,description
     
123. From dede_arctype where reid='$typeid' And ishidden<>1 order by sortrank asc limit 0,$row";
     
124. //And id<>'$typeid'
     
125. $dtp2 = new DedeTagParse();
     
126. $dtp2->SetNameSpace("field","[","]");
     
127. $dtp2->LoadSource($innertext);
     
128. $dsql2->SetQuery($sql);
     
129. $dsql2->Execute();
     
130. $line = $row;
     
131. 
     
132. for($i=0;$i < $line;$i++)
     
133. {
     
134. if($col>1) $likeType .= "<dl>\r\n";
     
135. for($j=0;$j<$col;$j++)
     
136. {
     
137. if($col>1) $likeType .= "<dd>\r\n";
     
138. if($row=$dsql2->GetArray())
     
139. {
     
140. $row['typelink'] = $row['typeurl'] = GetOneTypeUrlA($row);
     
141. if(is_array($dtp2->CTags))
     
142. {
     
143. foreach($dtp2->CTags as $tagid=>$ctag){
     
144. if(isset($row[$ctag->GetName()]))
     
145. {
     
146. $dtp2->Assign($tagid,$row[$ctag->GetName()]);
     
147. }
     
148. elseif ('sonchannel' == $ctag->GetName())
     
149. {
     
150. $dtp2->Assign($tagid,lib_channel_son($ctag,$row['id'],$dsql2));
     
151. }
     
152. }
     
153. }
     
154. $likeType .= $dtp2->GetResult();
     
155. }
     
156. if($col>1) $likeType .= "</dd>\r\n";
     
157. }//Loop Col
     
158. if($col>1)
     
159. {
     
160. $i += $col - 1;
     
161. $likeType .= " </dl>\r\n";
     
162. }
     
163. }//Loop for $i
     
164. $dsql2->FreeResult();
     
165. return $likeType;
     
166. }
     
167. ?>

复制代码

模板调用

1. {dede:channel type='son' typeid='14'}
   
2. <div><a href="[field:typelink/]">[field:typename/]</a></div>
   
3. 
   
4. <ul>
   
5. [field:sonchannel]
   
6. <li><a href="[field:typelink/]">[field:typename/]</a></li>
   
7. [/field:sonchannel]
   
8. </ul>
   
9. {/dede:channel}

复制代码

技术学习教程网，支持一下。