账号通
    

账号  

密码  

2726

查看

8

回复
主题:KesionCMS V8.0 Final 模型自动开启的原因,及解决办法 [收藏主题] 转到:  
gmajip 当前离线

8

主题

0

广播

0

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

用户积分:296 分
登录次数:26 次
注册时间:2008/11/11
最后登录:2013/12/6
gmajip 发表于:2011/10/12 15:10:02   | 只看该作者 查看该作者主题 楼主 

这两天工作需要下载KesionCMS V8.0 Final BGK版本使用的时候发现,明明禁用的模型重新启动计算机后莫名其妙的开启。经过查找原因很简单官方在后台写了一段禁用付费模型的代码引起!



文件admin/index.asp 第33行



Sub CheckChannelStatus()

   if application("setmodelstatus")<>ChannelNotOnStr then

    conn.execute("update ks_channel set channelstatus=0 where channelid in(" & channelNotOnStr & ")")

    conn.execute("update ks_channel set channelstatus=1 where channelid not in(" & channelNotOnStr & ")")

   application("setmodelstatus")=ChannelNotOnStr

   Call KS.DelCahe(KS.SiteSN & "_ChannelConfig")

   end if

  End Sub



KS_Cls/Kesion.VersionCls.asp 第9行

Const ChannelNotOnStr="4,5,6,7,8,9,10,11"   '定义关闭的模块,请不要随便更改





由于每次登陆后台都会调用 ChannelNotOnStr变量,并且把这些模型设置为关闭(conn.execute("update ks_channel set channelstatus=0 where channelid in(" & channelNotOnStr & ")")就是这段代码

(channelstatus=0关闭,channelstatus=1开启) ;



解决办法禁用以下两段代码 admin/index.asp 第35、36行 在前面加个'单引号

'conn.execute("update ks_channel set channelstatus=0 where channelid in(" & channelNotOnStr & ")")

   ' conn.execute("update ks_channel set channelstatus=1 where channelid not in(" & channelNotOnStr & ")")



由于水平低,禁用后不知道会不会引发程序错误,本人目前未发现,使用正常!

 
  支持(6) | 反对(5) 回到顶部顶端 回到底部底部
fdgfdkh 当前离线

60

主题

0

广播

0

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

用户积分:30 分
登录次数:6 次
注册时间:2011/9/25
最后登录:2011/10/14
fdgfdkh 发表于:2011/10/12 15:12:31   | 只看该作者 查看该作者主题 沙发 
 
  支持(5) | 反对(5) 回到顶部顶端 回到底部底部
zzpfb1 当前离线

454

主题

0

广播

0

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

用户积分:484 分
登录次数:53 次
注册时间:2011/9/21
最后登录:2011/11/29
zzpfb1 发表于:2011/10/12 15:29:36   | 只看该作者 查看该作者主题 藤椅 
 
  支持(4) | 反对(4) 回到顶部顶端 回到底部底部
veryp 当前离线

3738

主题

328

广播

29

粉丝
添加关注
级别:大三

用户积分:14990 分
登录次数:1155 次
注册时间:2006/5/29
最后登录:2023/3/28
veryp 发表于:2011/10/12 15:34:16   | 只看该作者 查看该作者主题 板凳 
加油官方出来解决一下吧;
 
公布一个骗子.大家注意....孤山寒竹.Q36572105
  支持(2) | 反对(0) 回到顶部顶端 回到底部底部
dacvstx 当前离线

130

主题

0

广播

0

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

用户积分:130 分
登录次数:17 次
注册时间:2011/10/10
最后登录:2011/11/30
dacvstx 发表于:2011/10/13 12:54:01   | 只看该作者 查看该作者主题 报纸 
科汛智能建站系统
对不起,该用户所发的帖已全被锁定!
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
sffwzgd 当前离线

3513

主题

0

广播

0

粉丝
添加关注
级别:大三

用户积分:3109 分
登录次数:84 次
注册时间:2011/6/22
最后登录:2015/9/23
sffwzgd 发表于:2011/10/13 13:36:47   | 只看该作者 查看该作者主题 地板 
科汛在线网校系统
这个帖子应该顶下…
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
louclh 当前离线

60

主题

0

广播

0

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

用户积分:375 分
登录次数:126 次
注册时间:2009/12/8
最后登录:2014/8/20
louclh 发表于:2012/2/20 10:20:04   | 只看该作者 查看该作者主题 7楼 

在admin/index.php找到以下定义变量值中,增加变量就可以:

Dim KSCls
Dim ChannelNotOnStr  
Set KSCls = New Admin_Index
KSCls.Kesion()
Set KSCls = Nothing

Class Admin_Index
        Private KS

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

13

主题

4

广播

0

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

用户积分:124 分
登录次数:50 次
注册时间:2010/1/9
最后登录:2015/11/23
heishuai 发表于:2012/7/4 21:55:07   | 只看该作者 查看该作者主题 8楼 
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
ekin_war 当前离线

252

主题

0

广播

0

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

用户积分:294 分
登录次数:6 次
注册时间:2012/3/26
最后登录:2012/10/31
ekin_war 发表于:2012/7/4 22:52:51   | 只看该作者 查看该作者主题 9楼 
做在线知识付费 选科汛云开店
定义关闭的模块,请不要随便更改
 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行2.10156秒 powered by KesionCMS 9.0