www.gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\source_\admin\power.asp

    <!--#include file="../inc/conn.asp"-->
<%
function powercheck(power_name)
if session("ad_level")=0 then
  powercheck=true
else
  login=session("admin")
  sql="select * from admin_all where login='"&login&"' and power_name='"&power_name&"'"
  Set Rs=Server.CreateObject("Adodb.RecordSet")
  Rs.Open sql,conn,1,1
  if Rs.Eof then
   powercheck=false
  else
   powercheck=true
  end if
  Rs.Close
  Set Rs=nothing
  Set conn=nothing
 end if
 end function
 %>