这两天工作需要下载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 & ")")

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

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

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

Class Admin_Index
        Private KS