当前位置:资源吧源码资讯中心论坛文章动网论坛 → 文章内容

动网7.0sp2 设定精华贴加减威望的方法

减小字体 增大字体 作者:未知  来源:http://www.ziyuan8.com/down  发布时间:2004-9-25 16:26:48

打开:admin_postings.asp文件

大约1268行处找到(在Public Sub isbest() 函数内)

Insert_Forum_Log()
Update_User_Point(",userIsBest=userisBest+1")

修改Update_User_Point(",userIsBest=userisBest+1")为

Update_User_Point(",userIsBest=userisBest+1,UserPower=UserPower+1")

这是加精华加威望的语句。

同文件在1295行处(在Public Sub nobest()函数内的)

Insert_Forum_Log()
Update_User_Point(",userIsBest=userisBest-1")

修改Update_User_Point(",userIsBest=userisBest-1")为

Update_User_Point(",userIsBest=userisBest-1,UserPower=UserPower-1")

解除精华减威望的语句。

语句中的UserPower是用户数据的威望表列,+1 和-1是加减威望的值可随意修改成你希望的值。