账号通
    

账号  

密码  

2877

查看

6

回复
主题:栏目导航中的”同级频道导航和当前频道导航“的代码中每一项都 有class=currclass。 [收藏主题] 转到:  
yanglxg2010 当前离线

562

主题

13

广播

4

粉丝
添加关注
级别:五年级

用户积分:2810 分
登录次数:158 次
注册时间:2010/3/17
最后登录:2018/10/7
yanglxg2010 发表于:2012/8/15 17:08:23   | 显示全部帖子 查看该作者主题 楼主 
科汛智能建站系统

栏目导航中的”同级频道导航和当前频道导航“的代码中每一项都 有class="currclass"。
如何修改成像v8那样。


              v9导航:        

  1. <ul><li class="currclass"><a href="/Item/list.asp?id=690">国内</a></li> <li class="currclass"><a href="/Item/list.asp?id=689">国际</a></li> <li class="currclass"><a href="/Item/list.asp?id=688">社会</a></li> <li class="currclass"><a href="/Item/list.asp?id=684">经济</a></li> <li class="currclass"><a href="/Item/list.asp?id=683">文化</a></li> <li class="currclass"><a href="/Item/list.asp?id=682">娱乐</a></li> <li class="currclass"><a href="/Item/list.asp?id=680">教育</a></li> <li class="currclass"><a href="/Item/list.asp?id=679">健康</a></li> <li class="currclass"><a href="/Item/list.asp?id=678">生活</a></li> <li class="currclass"><a href="/Item/list.asp?id=675">视频</a></li> <li class="currclass"><a href="/Item/list.asp?id=674">房产</a></li> <li class="currclass"><a href="/Item/list.asp?id=1202">财经</a></li> <li class="currclass"><a href="/html/Special/Index.asp">专题</a></li></ul>
v8导航:            

  1.    <ul>                                   <li class="currclass"><a  href="/Item/list.asp?id=690">国内</a></li>                                     <li><a  href="/Item/list.asp?id=689">国际</a></li>                                     <li><a  href="/Item/list.asp?id=688">社会</a></li>                                     <li ><a  href="/Item/list.asp?id=684">经济</a></li>                                     <li><a  href="/Item/list.asp?id=683">文化</a></li>                                     <li><a  href="/Item/list.asp?id=682">娱乐</a></li>                                     <li><a  href="/Item/list.asp?id=680">教育</a></li>                                     </ul>

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
yanglxg2010 当前离线

562

主题

13

广播

4

粉丝
添加关注
级别:五年级

用户积分:2810 分
登录次数:158 次
注册时间:2010/3/17
最后登录:2018/10/7
yanglxg2010 发表于:2012/8/15 22:01:26   | 显示全部帖子 查看该作者主题 沙发 
做在线知识付费 选科汛云开店
  1. '增加第一级导航判断 ElseIf  Instr(KS.C_C(Fcls.RefreshFolderID,8),",")<>0 And Instr(Node.SelectSingleNode("@ts").text,",")<>0 then   if Split(Node.SelectSingleNode("@ts").text,",")(0)=Split(KS.C_C(Fcls.RefreshFolderID,8),",")(0) Then     echo  "  <li class=""currclass"""&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"   else     echo  "  <li"&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"   end if   '===========


增加第一级导航判断出现了上述问题

增加第一级导航判断影响了二级频道导航

求解决方法
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
yanglxg2010 当前离线

562

主题

13

广播

4

粉丝
添加关注
级别:五年级

用户积分:2810 分
登录次数:158 次
注册时间:2010/3/17
最后登录:2018/10/7
yanglxg2010 发表于:2012/8/16 14:46:20   | 显示全部帖子 查看该作者主题 藤椅 
科汛智能建站系统

解决方法:



打开ks_cls/kesion.label.functioncls.asp



找到



2026行左右



For Each Node In XML.DocumentElement.SelectNodes("row")

           ClassID=Node.SelectSingleNode("@id").text

        If FCls.RefreshFolderID=ClassID or (UCase(FCls.RefreshType) = "INDEX" and kk=0) Then

        echo  "  <li class=""currclass"""&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

        '增加第一级导航判断

        ElseIf  Instr(KS.C_C(Fcls.RefreshFolderID,8),",")<>0 And Instr(Node.SelectSingleNode("@ts").text,",")<>0 then

         if Split(Node.SelectSingleNode("@ts").text,",")(0)=Split(KS.C_C(Fcls.RefreshFolderID,8),",")(0) Then

           echo  "  <li class=""currclass"""&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

         else

           echo  "  <li"&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

         end if

         '===========

        Else

        echo  "  <li"&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

        End If

        echo "<a " & KS.GetCss(T_Css) & " href=""" & KS.GetFolderPath(ClassID) & """" & O_P_T & ">" & Trim(Node.SelectSingleNode("@foldername").text) & "</a></li>"

        kk=kk+1

        Next







修改为:







For Each Node In XML.DocumentElement.SelectNodes("row")

           ClassID=Node.SelectSingleNode("@id").text

        If FCls.RefreshFolderID=ClassID or (UCase(FCls.RefreshType) = "INDEX" and kk=0) Then

        echo  "  <li class=""currclass"""&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

        '增加第一级导航判断

        ElseIf  Split(KS.C_C(Fcls.RefreshFolderID,8)&",",",")(0)=classid then

           echo  "  <li class=""currclass"""&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

         '===========

        Else

          echo  "  <li"&KS.GetCssID(LIID)&KS.GetCss(LICss)&">"

        End If

        echo "<a " & KS.GetCss(T_Css) & " href=""" & KS.GetFolderPath(ClassID) & """" & O_P_T & ">" & Trim(Node.SelectSingleNode("@foldername").text) & "</a></li>"

        kk=kk+1

        Next







注意两段加颜色的代码是修改的部分。

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.61328秒 powered by KesionCMS 9.0