权限控制

 

if  Session( " Power1 " ) <> " 市委政法委 "   then
       if   trim (Session( " Power3 " )) <> " 部门 "   then
        sql  =   " select * from 执法工作绩效表 where 所属区县=' " & session( " Power1 " ) & " 'and 所属系统=' " & session( " Power2 " ) & " ' and 所属部门=' " & session( " Power3 " ) & " ' or 类别 like ' " & session( " leibie " ) & " %%%' order by  所属区县,所属系统,所属部门,编号 desc "  
     else   if   trim (Session( " Power2 " )) <> " 系统 "   then
         sql  =   " select * from 执法工作绩效表 where 所属区县=' " & session( " Power1 " ) & " 'and 所属系统=' " & session( " Power2 " ) & " ' or 类别 like ' " & session( " leibie " ) & " %%%' order by  所属区县,所属系统,所属部门,编号 desc "
     else
         sql  =   " select * from 执法工作绩效表 where 所属区县=' " & session( " Power1 " ) & " ' or 类别 like ' " & session( " leibie " ) & " %%%' order by  所属区县,所属系统,所属部门,编号 desc "
     end   if
     end   if
     else   if  request.QueryString( " qx " ) <> ""   then
   sql  =   " select * from 执法工作绩效表 where 所属区县=' " & request.QueryString( " qx " ) & " ' order by  所属区县,所属系统,所属部门,编号 desc "
    else   if  request.QueryString( " xm " ) <> ""   then
   sql  =   " select * from 执法工作绩效表 where 姓名=' " & request.QueryString( " xm " ) & " ' order by  所属区县,所属系统,所属部门,编号 desc "
    else
    Sql  =   " select * from 执法工作绩效表 where 类别 like ' " & session( " leibie " ) & " %%%' order by  所属区县,所属系统,所属部门,编号 desc "
end   if
end   if
end   if

权限控制:<相应权限可以显示相应功能>

 

< td align = center width = " 10% "  style = " display:<%if session( " Power1 " )<> " 市委政法委 "  then response.Write( " none " ) end if%>  " >
< a href = " modify_jx.asp?id=<%=Rs( " 编号 " )%> " >< img src = " ../images/modify.gif "  width = " 40 "  height = " 20 "  border = " 0 " ></ a >
</ td >  
< td align = center width = " 11% "  style = " display:<%if session( " Power1 " )<> " 市委政法委 "  then response.Write( " none " ) end if%>  " >
< a href = " # "  onClick = " return winConfirm(<%=Rs( " 编号 " )%>) " >< img src = " ../images/delete.gif "  width = " 40 "  height = " 20 "  border = " 0 " >   </ a >
  </ td >