| 用户管理 | |||||
|---|---|---|---|---|---|
| 注意事项 | ①点删除按钮将删除所选定的用户，此操作是不可逆的；②您可以批量移动用户到相应的组；③点用户名进行相应的资料操作；④点用户最后登陆IP可进行锁定IP操作；⑤点用户Email将给该用户发送Email | ||||
| 搜索结果 | |||||
| 请指定搜索参数！ | |||||
| 错误的参数。 | |||||
| 没有找到相关记录。 | |||||
| 执行结果 | |||||
| 请指定相关参数。 | |||||
| 请选择相关用户。 | |||||
| 操作成功。 | |||||
| 操作成功。 | |||||
| 错误的参数。 | |||||
| 用户资料操作 | |||||
| 错误的用户参数。 | |||||
| 没有找到相关用户。 | |||||
| 更新用户资料 | |||||
| 错误的用户参数。 | |||||
| 没有找到相关用户。 | |||||
| 更新失败。 | |||||
| 更新用户数据成功。 | |||||
| 编辑"&request("username")&"论坛权限（红色表示该用户在该版面有自定义权限） | |||||
| 错误的用户参数。 | |||||
| ①您可以设置该用户在不同论坛内的权限，红色表示为该用户组使用的是用户自定义属性 ②该权限不能继承，比如您设置了一个包含下级论坛的版面，那么只对您设置的版面生效而不对其下属论坛生效 ③如果您想设置生效，必须在设置页面选择自定义设置，选择了自定义设置后，这里设置的权限将优先于用户组设置和论坛权限设置，比如用户组默认或论坛权限设置该用户组不能管理帖子，而这里设置了该用户可管理帖子，那么该用户在这个版面就可以管理帖子 | |||||
| 编辑该用户在其它页面的权限（主要针对短信部分设置） | |||||
| 点击论坛名称进入编辑状态 " sql="select * from board order by rootid,orders" set rs=server.createobject("adodb.recordset") rs.open sql,conn,1,1 do while not rs.eof if rs("depth")>0 then for i=1 to rs("depth") response.write " " next end if if rs("child")>0 then response.write " " rs.movenext loop set rs=nothing response.write " | |||||
| 错误的用户参数。 | |||||
| 错误的版面参数。 | |||||
| 编辑 "&membername&" 在 "&boardtype&" 权限 | |||||
| 注意：该用户属于 "&usertitle&" 用户组中，如果您设置了他的自定义权限，则该用户权限将以自定义权限为主 | |||||
|
<%
Dim reGroupSetting
Dim FoundGroup,FoundUserPermission,FoundGroupPermission
FoundGroup=false
FoundUserPermission=false
FoundGroupPermission=false
set rs=conn.execute("select * from UserAccess where uc_boardid="&request("boardid")&" and uc_userid="&request("userid"))
if not (rs.eof and rs.bof) then
reGroupSetting=split(rs("uc_Setting"),",")
FoundGroup=true
FoundUserPermission=true
end if
if not foundgroup then
set rs=conn.execute("select * from BoardPermission where boardid="&request("boardid")&" and groupid="&usergroupid)
if not(rs.eof and rs.bof) then
reGroupSetting=split(rs("PSetting"),",")
FoundGroup=true
FoundGroupPermission=true
end if
end if
if not foundgroup then
set rs=conn.execute("select * from usergroups where usergroupid="&usergroupid)
if rs.eof and rs.bof then
response.write "未找到该用户组！"
response.end
else
FoundGroup=true
FoundGroupPermission=true
reGroupSetting=split(rs("GroupSetting"),",")
end if
end if
%>
| |||||
| 编辑用户 "&request("username")&" 权限 | |||||
| 错误的用户参数。 | |||||
| 错误的版面参数。 | |||||
| 更新失败。 | |||||
| 设置用户权限成功。 | |||||