当前位置：
|
主题：[已解决]系统设置数组会变无穷大bug [收藏主题] |
 我刚下载了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)
 顶端  底部
|
| ＜上一主题 | 下一主题 ＞ |