Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Olá galera,
Por favor eu preciso fazer funcionar esse script para que minha pagina restrita aos usuarios funcione efetivamente.
Abaixo estão os codigos que eu utilizei.
NO FLASH
username_field.text = "";
password_field.text = "";
stop();
function doValidation() {
if (_url.substr(0, 4) == "file") {
adminURL = "[http://www.maisbartenders.com.br/parceiros/validacao.asp";](http://www.maisbartenders.com.br/parceiros/validacao.asp)
} else {
adminURL = "validacao.asp";
}
adminLogin = new LoadVars();
adminLogin.nome = username_field.text;
adminLogin.senha = password_field.text;
loginData = new LoadVars();
loginData.onLoad = loginDone;
loginMessage.text = "Checando usuário e senha";
adminLogin.sendAndLoad(adminURL,loginData);
}
function loginDone(success) {
if (success) {
if (this.varAccess == "ok") {
loginMessage.text = "Acesso Permitido";
//aqui você escolhe o arquivo que quer
//que abra após a validação
//no meu caso eu coloquei um MC instanciado
//como teste e pedi para um swf externo abrir ali
getURL("userindex.asp");
} else {
loginMessage.text = "Acesso Negado - Nome ou senha inválidos";
}
} else {
loginMessage.text = "Ocorreu um problema";
}
}
submit_btn.onRelease = doValidation;
reset_btn.onRelease = function() {
UserName_field.text = "";
password_field.text = "";
};
NO VALIDAÇÃO.ASP
<%
Dim conn
Dim rs
Dim varGranted
set conn = server.createobject("adodb.connection")
set rs = server.createobject("adodb.recordset")
conn.open "driver={microsoft access driver (*.mdb)};dbq=" & server.mappath("login.mdb")
rs.open "select * from login where nome='" & request("nome") & _
"' and senha='" & request("senha") & "'",conn
if rs.eof=false then
varGranted="ok"
Session("logado") = false
else
varGranted="no"
end if
conn.close
set rs = nothing
set conn = nothing
Response.write ("varAccess="&varGranted)
%>
E NO USERRINDEX.ASP que é a pagina restrita. Mas que não sei pq não está restrita, mesmo sem login estou conseguindo acessar através do caminho direto no ie.
<%
If NOT Session("logado") = false Then
Response.redirect("http://www.maisbartenders.com.br/parceiros")
Response.End
End If
%>
<html>
<body>
Você conseguiu acessar, você está logado. Clique <a href="[http://www.maisbartenders.com.br/parceiros">aqui](http://www.maisbartenders.com.br/parceiros) para voltar para a pagina de login.
</body>
</html>Abraços.
Carregando comentários...