账号通
    

账号  

密码  

5542

查看

8

回复
主题:[分享]v5.51限制某个模型只能发表文章篇数 [收藏主题] 转到:  
一生有你 当前离线

10439

主题

0

广播

18

粉丝
添加关注
级别:版主

用户积分:72521 分
登录次数:1969 次
注册时间:2006/7/1
最后登录:2021/8/25
一生有你 发表于:2009/2/27 17:03:00   | 显示全部帖子 查看该作者主题 楼主 
科汛在线网校系统

刚看到有人需要这个限制,就分享下吧.也放你也用得着.

 

按如下步骤操作

 

用dw工具,打开user/user_myarticle.asp这个文件,然后找到以下代码,差不多241行

 

'添加文章
  Sub DoAdd()

    '============增加判断=============

    if channelid=113 then       '只对113的模型有效

     dim acticlenum:articlenum=conn.execute("select count(*) from " & KS.C_S(ChannelID,2) &" Where ArticleInput='" & KSUser.UserName &"'")(0)

    if articlenum>=3 then

       response.write "<script>alert('对不起,本频道限制每个会员只能发布3篇!');history.back();</script>"

        response.end

       end if

   end if

   '===============增加判断结束=============
        Call KSUser.InnerLocation("发布"& KS.C_S(ChannelID,3))
    if KS.S("Action")="Edit" Then
    Dim KS_A_RS_Obj:Set KS_A_RS_Obj=Serve

 

 

增加上面红色的部分即可

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
一生有你 当前离线

10439

主题

0

广播

18

粉丝
添加关注
级别:版主

用户积分:72521 分
登录次数:1969 次
注册时间:2006/7/1
最后登录:2021/8/25
一生有你 发表于:2009/2/27 21:17:00   | 显示全部帖子 查看该作者主题 沙发 
科汛在线网校系统

原理差不多.我这种适合临时需求的解决方法,不需要改动数据库.

 
  支持(0) | 反对(0) 回到顶部顶端 回到底部底部
<上一主题 | 下一主题 >
Powered By KesionCMS Version X1
厦门科汛软件有限公司 © 2006-2016 页面执行5.50977秒 powered by KesionCMS 9.0