大家好,对帝国CMS系统积分问题感兴趣的小伙伴,下面一起跟随三零脚本的小编来看看帝国CMS系统积分问题的例子吧。
1. 会员邀请注册送积分?
2. 管理会员组,当会员积分达到一定数量时,自动升级会员等级?
3. 会员可以通过积分兑换 发表文章时自定义文字标题的颜色,关于看到有些人提出积分兑换置顶帖,我想就没有必要了,要是N多会员都在同一终极栏目下要换置顶帖,就不好办了。
4. 留言(评论)加积分,附:每天留言积分上限 限制?
5. 每天投稿积分上限 限制?
整合一些以解决问题:
一. 登陆送积分:
修改步骤:
1、进入管理会员字段增加如下字段:
字段名:LastTime 字段标识:最后登陆时间 字段类型:大数值型(INT)
2、打开,e/class/user.php 找到大约1019行 if($set1&&$set2) 这个地方,在 $location=DoingReturnUrl($location,$_POST['ecmsfrom']); 前面增加如下代码
//会员登陆赠送点数
$LastTime=time();
$useridz=(int)$r[$user_userid];
$fenus=2; //赠送积分
$LastT=$empire->fetch1("select LastTime from {$dbtbpre}enewsmemberadd where `userid`={$useridz}");
(int)$newstime=$LastT['LastTime'];//时间
(int)$times=mktime(0,0,0,date('m',$LastTime),date('d',$LastTime),date('Y',$LastTime));//当前时间
if($newstime==0){$empire->query("update {$dbtbpre}enewsmember set `userfen`=userfen+{$fenus} where `userid`={$useridz}");}else{
if($times<$newstime && $newstime<$times+86400){
//今天
}else{
$empire->query("update {$dbtbpre}enewsmember set `userfen`=userfen+{$fenus} where `userid`={$useridz}");
}
}
$empire->query("update {$dbtbpre}enewsmemberadd set `LastTime`={$LastTime} where `userid`={$useridz}");
//结束
二. 会员通过推荐点击链接获得点数:
》链接地址为:“http://网站地址/e/tool/gfen?id=会员帐号ID”或“http://网站地址/e/tool/gfen?n=会员用户名”
》信息基本参数配置:修改“e/tool/gfen/index.php”文件的参数设置
三. 按会员积分,等级,字段调用会员:
按会员积分排列调用:
[ecmsinfo]'select phome_enewsmemberadd.userid as userid,phome_enewsmemberadd.company as title,phome_enewsmemberadd.userpic as titlepic,phome_enewsmemberadd.call as ftitle,phome_enewsmemberadd.saytext as smalltext From phome_enewsmember,phome_enewsmemberadd Where phome_enewsmember.userid =phome_enewsmemberadd.userid and zsxs=1 order by phome_enewsmember.userfen desc',5,16,0,24,14,1[/ecmsinfo]
按会员等级调用:
[ecmsinfo]'select phome_enewsmemberadd.userid as userid,phome_enewsmemberadd.company as title from phome_enewsmemberadd,phome_enewsmember Where phome_enewsmember.userid =phome_enewsmemberadd.userid and phome_enewsmember.groupid=4',60,30,0,24,15,0[/ecmsinfo]
按会员类别调用:
[ecmsinfo]'select userid as userid, company as title,userpic as titlepic,call as ftitle,saytext as smalltext from phome_enewsmemberadd where keshi=1',1,18,0,24,16,1[/ecmsinfo]