主题:  关于动网文章管理程序3。0的一些问题需要大家指点

阿鲁巴

职务:普通成员
等级:2
金币:1.0
发贴:342
#12001/8/4 19:18:15
用过动网文章管理3。0的人都知道~动网使用的文章录入员的分级权限,有超级用户,普通管理用户,录入员,三种。
1>录入员只能录入不能修改文章。
2>普通管理用户能所有修改文章和录入文章。
3>超级用户则获得全部权限。

我现在想实现的一种效果就是录入员可以修改自己录入的文章,不能修改别人录入的文章,这和论坛的斑竹和作者可以编辑帖子这点相象!谁知道应该怎么实现呢??


大家看看以下代码:
<%
  if session("admin")="" then
  response.redirect "admin.asp"
  else
	if session("flag")>2 then
		response.write "

您没有操作的权限

" response.end end if end if %>


session("admin")=""
session("flag")
是全局定义用户的用户名以及权限,如代码所示,当flag也就是等级低于普通管理用户的时候将没有权限修改这文章,那么我现在应该怎么去修改这些代码,使录入员也可以修改自己录入的文章。

<%=rs("username")%>=session("admin")

username就是本文的录入员ID

我思路就是这样…………

但不知道该怎么实现



5D荣誉斑竹

职务:普通成员
等级:5
金币:10.0
发贴:3292
#22001/8/5 10:07:52
在else后面加IF语句检测






阿鲁巴

职务:普通成员
等级:2
金币:1.0
发贴:342
#32001/8/5 10:47:13
hve在上个贴子中说
引用:
在else后面加IF语句检测




请问hve,具体应该怎么写呢?我的else后面已经有if



阿鲁巴

职务:普通成员
等级:2
金币:1.0
发贴:342
#42001/8/5 10:54:22
请斑竹把此帖转移到Server端技术,谢谢。



Coolshow

职务:普通成员
等级:1
金币:0.0
发贴:4
#52001/8/5 11:00:44
阿鲁巴在上个贴子中说
引用:
用过动网文章管理3。0的人都知道~动网使用的文章录入员的分级权限,有超级用户,普通管理用户,录入员,三种。
1>录入员只能录入不能修改文章。
2>普通管理用户能所有修改文章和录入文章。
3>超级用户则获得全部权限。

我现在想实现的一种效果就是录入员可以修改自己录入的文章,不能修改别人录入的文章,这和论坛的斑竹和作者可以编辑帖子这点相象!谁知道应该怎么实现呢??


大家看看以下代码:
<%
  if session("admin")="" then
  response.redirect "admin.asp"
  else
	if session("flag")>2 then
		response.write "

您没有操作的权限

" response.end end if end if %>


session("admin")=""
session("flag")
是全局定义用户的用户名以及权限,如代码所示,当flag也就是等级低于普通管理用户的时候将没有权限修改这文章,那么我现在应该怎么去修改这些代码,使录入员也可以修改自己录入的文章。

<%=rs("username")%>=session("admin")

username就是本文的录入员ID

我思路就是这样…………

但不知道该怎么实现



<%
if session("admin")="" then
response.redirect "admin.asp"
else
if session("username")=rs("panner") then ' 如果登陆名等于在数据库中作者的姓名
'进行数据更新
else
    if session("flag")>2 then
        response.write "

您没有操作的权限

"
        response.end
end if
    end if
end if
%>



禁止笑脸转换 :)

编辑历史:[这消息被hve编辑过(编辑时间2001-08-05 13:50:17)]


阿鲁巴

职务:普通成员
等级:2
金币:1.0
发贴:342
#62001/8/5 13:30:04
<%
if session("admin")="" then
response.redirect "admin.asp"
else

if session("admin")=rs("username") then'
else

if session("flag")>2 then
response.write "

您没有操作的权限

"
response.end
end if
end if
end if
%>

是这样写的代码吧!



阿鲁巴

职务:普通成员
等级:2
金币:1.0
发贴:342
#72001/8/5 13:20:50
Microsoft VBScript 运行时错误 错误 '800a000d'

类型不匹配


最后一个end if出现了这样的问题~~~~

Coolshow~你是肥虫的朋友吧~谢谢特意注册回答我的问题~~~



5D荣誉斑竹

职务:普通成员
等级:5
金币:10.0
发贴:3292
#82001/8/5 13:48:12
转Server端技术