账号通
    

账号  

密码  

6540

查看

10

回复
主题:[分享]V5.5/V5.51通用循环栏目标签bug的修改方法 [收藏主题] 转到:  
科汛官方 当前离线

47268

主题

145

广播

405

粉丝
添加关注
级别:管理员

用户积分:101604 分
登录次数:7935 次
注册时间:2006/12/7
最后登录:2023/12/14
科汛官方 发表于:2009/3/3 18:15:00   | 显示全部帖子 查看该作者主题 楼主 
做在线知识付费 选科汛云开店

 

错误:得到的内层循环内容都一样

 

可以见http://bbs.kesion.com/dispbbs.asp?boardid=41&Id=68718

 

说明这个错误所有V5.5x版本的都存在,修改方法都一样.如果你没有用到通用循环标签,可以跳过不用改

 

解决方法:

 

打开ks_cls/kesion.label.functioncls.asp,找到约200多行,每个用户的行数可能不一样,你可以用dw工具打开这个文件,然后查找如下语句:

 

InnerSQL=GetRelations(ClassNode,InnerSQL)

 

 

即找到如下代码

 

If Not ClassList Is Nothing Then
    For Each ClassNode in classlist.documentElement.SelectNodes("outerrow")
      ClassNode.setAttribute "classlink",KS.GetFolderPath(ClassNode.selectSingleNode("@id").text)
     
      InnerSQL=GetRelations(ClassNode,InnerSQL)
      Set RS=Conn.Execute(InnerSQL)
      Set datalist=RsToxml(rs,"innerrow","innerlist")
      Classnode.appendChild(datalist.documentElement.cloneNode(True))
            Next

 

 

注意上面加红色的改为

    

      Dim ISQL:ISQL=InnerSQL
      ISQL=GetRelations(ClassNode,ISQL)
      Set RS=Conn.Execute(ISQL)

完成后保存即可.

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