账号通
    

账号  

密码  

1729

查看

2

回复
主题:[已解决]系统设置数组会变无穷大bug [收藏主题]  
jeman888 当前离线

32

主题

0

广播

0

粉丝
添加关注
级别:学前班

用户积分:98 分
登录次数:34 次
注册时间:2013/6/20
最后登录:2021/12/7
jeman888 发表于:2015/10/8 12:18:42   | 只看该作者 查看该作者主题 楼主 
科汛在线考试系统(NET)
我刚下载了KesionEshop X1.0.150227Free(utf-8)
然后发现这个问题,kesion_cls/Kesion.CommonCls.asp 行178 InitialConfig()

如果你修改过系统配置N次,那么这个数组就一直变大,大到吓人!!!

Public Sub InitialConfig()


If not IsObject(Application(SiteSN&"_Config")) then  GetSetting


Setting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@setting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")


TbSetting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@tbsetting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")

        SSetting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@spacesetting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")

JSetting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@jobsetting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")


ASetting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@asksetting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")


WSetting=Split(Replace(Application(SiteSN&"_Config").documentElement.selectSingleNode("config/@wapsetting").text&"^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^^%^","$br$",vbcrlf),"^%^")
''下面这行测试我说的问题
die ubound(Setting)&"<br>"&ubound(TbSetting)&"<br>"&ubound(SSetting)&"<br>"&ubound(JSetting)&"<br>"&ubound(ASetting)&"<br>"&ubound(WSetting)

End Sub


----------------------------------华丽分隔线----------------------------------------------------
下面是测试结果
ubound(Setting) = 11497 这里变成了好大了
11497
64
104
94
99
94
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
科汛官方 当前离线

47268

主题

145

广播

405

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

用户积分:101604 分
登录次数:7935 次
注册时间:2006/12/7
最后登录:2023/12/14
科汛官方 发表于:2015/10/8 17:48:53   | 只看该作者 查看该作者主题 沙发 
新版本X1.5会修正,感谢提供!
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
hasdiff 当前离线

802

主题

2

广播

11

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

用户积分:4150 分
登录次数:442 次
注册时间:2011/10/28
最后登录:2024/6/18
hasdiff 发表于:2015/10/9 9:03:23   | 只看该作者 查看该作者主题 藤椅 
科汛智能建站系统
我也看到这个了,但是没考虑到是这个问题
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行0.17188秒 powered by KesionCMS 9.0