<%
'VERIFICA SE ESTÁ LOGANDO
if request.form("logar") = "sim" then
'PEGA PARAMETROS PARA LOGIN
email = pega("email")
senha = pega("senha")
'VERIFICA SE ESTÃO EM BRANCO
msg = ""
if email = "" then
msg = msg & "Por favor, preencha seu endereço de e-mail."
else
if senha = "" then
msg = msg & " Por favor, preencha sua senha de acesso."
else
'VERIFICOU QUE ESTÃO PREENCHIDOS. EFETUA LOGIN.
SQL = "SELECT * FROM atendentes WHERE email='"&email&"' and senha='"&senha&"'"
set rs = conexao.execute(SQL)
if rs.eof or rs.bof then
msg = msg & "E-mail ou Senha de acesso inválido!"
else
session("atendente") = rs("id")
session("nome_atendente") = rs("nome")
'VERIFICA NÍVEL DO LOGIN INFORMADO
if rs("nivel")="o" then
response.redirect "monitor.asp"
elseif rs("nivel") = "a" then
response.redirect "adm.asp"
End if
end if
end if
end if
end if
%>
<%=titulo%>