<%
dim adm_power
 if request.cookies("adm_dl")=empty then
Response.Write("对不起，您没有权限打开本页或登录超时．．请重新登录")
response.end 
end if

rs.open "select * from admin where userid='"&request.cookies("dluser")&"' and password='"&request.cookies("dlpassword")&"'",conn,1,1
if  rs.eof  then
Response.Write("对不起，您没有权限打开本页或登录超时．．请重新登录")
response.end 
end if
adm_power=rs("adm_power")
rs.close

if instr(adm_power,adm_power_page)=0 then
 Response.Write "对不起,您没有对本页操作的权限,请不要越权操作.."
 Response.end
 end if
%>