用户在前台发布消息权限后台用户组控制帖子浏览以往版本交流论坛乔客论坛乔客官方网站

等级

发贴91贴
积分150分
货币5.9乔币
注册2005-12-6

用户在前台发布消息权限后台用户组控制

比如
你要是想让VIP用户发布信息后台就设置VIP拥护组
选择VIP后 VIP用户组发布的信息不用审核!
修改方法
修改文件
1 include/admin_config_edit.asp
查找web_frm_word=code_config(request.form("web_frm_word"),0)
下面添加

Code:

web_pass=code_config(request.form("web_pass"),0)

查找
<tr>
<td>超级管理员：</td>
<td><input type=text name=web_dim_3 value='<%response.write web_dim(3)%>' size=20 maxlength=20></td>
<td class=gray><%call admin_read("","超级管理员","拥有最高权限可进行核心管理，多个关键字请用“,”（小写的豆号）格开")%></td>
</tr>
下面添加

Code:

<%
tmp1=web_dim(19)
if not(isnumeric(tmp1)) then tmp1=0
tmp1=int(tmp1)
%>
<tr>
<td>审核用户：</td>
<td>
<select name=web_pass size=1>
<%
dim dim_tmp
  for i=0 to ubound(dim_user)
    dim_tmp=split(dim_user(i),":")
    response.write vbcrlf&"<option value='"&dim_tmp(0)&"'"
    if web_dim(19)=dim_tmp(0) then response.write " selected"
    response.write ">"&dim_tmp(1)&"（"&dim_tmp(0)&"，系数："&dim_tmp(2)&"）</option>"
  next
%></select>
</td>
<td class=gray>具有不审核用户组</td>
</tr>

2.修改文件include/common_other.asp
,web_n_girl后添件代码,web_pass
web_n_girl="美女"
下添加代码

Code:

web_pass=""

3.修改文件jk_template.asp文件
查找,web_n_girl后添加,web_pass
继续查找 vbcrlf&"web_n_girl="""&web_n_girl&"""" & _
下面添加

Code:

vbcrlf&"web_pass="""&web_pass&"""" & _

4.修改文件user_put.asp在头部第一个
<%下面添加web_pass=web_pass
然后查找
hidden=false
替换为

Code:

    if login_mode=""&web_pass&""  then
    hidden=true
    else
   hidden=false
   end if

最后后台更新下你要选择的用户组就OK了

本贴已被作者于 2006年06月18日 08时52分04秒编辑过

顶一下0 踩一下0