【动网论坛7.1 sp1 修改】－论坛同等级版主不能相互编辑的修改
1、完全去掉版主以上级别不可以相互编辑帖子的权限。
此修改需要屏蔽两个地方。
1、post.asp
找到
If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
Dvbbs.AddErrCode(75)
ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
Dvbbs.AddErrCode(76)
End If
将上面代码屏蔽
既改为
//If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
//Dvbbs.AddErrCode(75)
//ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
//Dvbbs.AddErrCode(76)
//End If
2、savepost.asp
找到
If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
Dvbbs.AddErrCode(75)
ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
Dvbbs.AddErrCode(76)
End If
也是屏蔽。即改为：
// If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
//Dvbbs.AddErrCode(75)
ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
//Dvbbs.AddErrCode(76)
//End If
2、如果你只是想设定版主以上某个组的成员可以相互编辑。请这样修改（修改地方也是两个。代码一样。就是找到上面1中post.asp合savepost.asp中的如下代码）
If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
Dvbbs.AddErrCode(75)
ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
Dvbbs.AddErrCode(76)
End If
把上面的<4改成小于4的数字。
其中1代表管理员组，2代表超级版主组，3代表版主组，4是会员组，这里小于4就把所有的管理团队的相互编辑权限给关了。修改需要修改两个文件，但是代码一样（savepost.asp和post.asp）
3、只是设定某个组没有相互编辑帖的权限修改
If Cint(Dvbbs.UserGroupID) < 4 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
Dvbbs.AddErrCode(75)
ElseIf Cint(Dvbbs.UserGroupID) < 4 and Cint(Dvbbs.UserGroupID) > rs("UserGroupID") Then
Dvbbs.AddErrCode(76)
End If
把上面红色中的4改成=3或者=2或者=1
如果只是设定管理员组和版主组不可以相互编辑帖子，那么就把红色中的 If Cint(Dvbbs.UserGroupID) <4改成是
If Cint(Dvbbs.UserGroupID) ==1 And If Cint(Dvbbs.UserGroupID)==3 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
也可以
If Cint(Dvbbs.UserGroupID) <>2 And Cint(Dvbbs.UserGroupID) = rs("UserGroupID") Then
等等，修改的方法很多。大家自己去研究。。。。
