sos，asp＋access权限问题！

[复制链接]

鰰﹎話

电梯直达

1^#

发表于 2010-1-7 03:42:17 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

sos，asp＋access权限问题！
我建了两张表user和part，
表user的字段有“id”（数字），“name”（文本），“userpart”（文本）
表part的字段有“id”（数字），“part”（文本），“系统登陆”，“客户管理”“查询”等字段，
将“系统登陆”“客户管理”“查询”等字段设置为“1”或“0”，1表示有权限操作，0表示没权限。
给每个页面都写了一个判断是否有权限操作代码。

<%dim strusername
strusername=trim(request.form("username"))%>
<script language=VBScript runat=SERVER>
Function check_power(power_string)
set Recordset1 = Server.CreateObject("ADODB.Recordset")
strSQL="SELECT * FROM part,user where name=userpart and username='"&trim(strusername)&"'"
Recordset1.Open strSQL,connstr,1,1
if Recordset1.recordcount=0 then
check_power = 0
else
if Recordset1(power_string).value=1 then
check_power = 1
else
check_power = 0
end if
end if
END Function
</script>
<%
if session("username")="" then
response.redirect"../index.asp"
else
if check_power("客户管理")=0 then
response.redirect"check_false.asp"
else
%>
.
.
.
<%end if%>
运行后系统显示错误，各位高手能给小弟指点哈吗？

收藏0

使用道具举报

紫恋

2^#

发表于 2010-1-7 03:42:19 | 只看该作者

strSQL="SELECT * FROM part a,user b where a.name=a.userpart and b.username='"&trim(strusername)&"'"

回复支持反对

使用道具举报

返回列表

		自动登录	找回密码
密码			注册