6.5 sp1会员投稿限定每天每个会员只能发布条数错误修改

6.5/6.5 sp1加入了每个会员组可以单独设置,在每个模型里投稿可以限制每天只能发布的条数，但经用户反应，这里存在小BUG，如文章系统限制每天每个会员只能发布2篇。由于现在条件限制判断少了用户名限制，导致如果已经有人发布了，新来的用户，就发布不了了。

具体修改如下：

打开ks_cls/kesion.membercls.asp找到105行左右

           Sub CheckMoney(ChannelID)
      
    '检查每个模型每天最多发信息量
    If KS.ChkCLng(KS.U_S(GroupID,2))<>-1 Then
      If KS.ChkClng(Conn.Execute("Select Count(*) From " & KS.C_S(ChannelID,2) &" Where Year(AddDate)=" & Year(Now) & " and Month(AddDate)=" & Month(Now) & " and Day(AddDate)=" & Day(Now))(0))>=KS.ChkCLng(KS.U_S(GroupID,2)) Then
           KS.ShowError("对不起,本频道限定每个会员每天只能发布<span style='color=red'>" & KS.ChkCLng(KS.U_S(GroupID,2)) & "</span>条信息!")
      End If
    End If
 

并修改成

           Sub CheckMoney(ChannelID)
      
    '检查每个模型每天最多发信息量
    If KS.ChkCLng(KS.U_S(GroupID,2))<>-1 Then
      If KS.ChkClng(Conn.Execute("Select Count(*) From " & KS.C_S(ChannelID,2) &" Where inputer='" & username & "' and Year(AddDate)=" & Year(Now) & " and Month(AddDate)=" & Month(Now) & " and Day(AddDate)=" & Day(Now))(0))>=KS.ChkCLng(KS.U_S(GroupID,2)) Then
           KS.ShowError("对不起,本频道限定每个会员每天只能发布<span style='color=red'>" & KS.ChkCLng(KS.U_S(GroupID,2)) & "</span>条信息!")
      End If
    End If
 

即加上上面红色的代码，限制每个会员！