admin_chkpurview.asp

QQ呱唧网

<%
AdminName=replace(trim(session("AdminName")),"'","")
AdminPassword=replace(trim(session("AdminPassword")),"'","")
if AdminName="" or adminpassword="" then
	response.redirect "Admin_login.asp"
end if
sqlGetAdmin="select * from Film_Admin where UserName='" & AdminName & "' and Password='" & AdminPassword & "'"
set rsGetAdmin=server.CreateObject("adodb.recordset")
rsGetAdmin.open sqlGetAdmin,conn,1,1
if  rsGetAdmin.eof then
	rsGetAdmin.close
	set rsGetAdmin=nothing
	call CloseConn()
	response.redirect "Admin_login.asp"
end if
%>