Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Pessoal,Tenho aqui um script em ASP que valida a senha para entrar numa pégina protegida.Como faço para colocar o javascript no Response.redirect para abrir a pagina em pop-up depois de validada a senha?O script da página que valida a senha é esse:----------------------------<%Response.Buffer = TrueSet DB = Server.CreateObject("ADODB.Connection")cnpath="DBQ=d:\web\usuarios.mdb"DB.Open "DRIVER={Microsoft Access Driver (.mdb)}; " & cnpathExecutar = "SELECT FROM tabela_de_usuarios"Set RecSet = DB.Execute(Executar)do while not recset.eofvnome = RecSet("nome")vsenha = RecSet("senha")vpaginainicial = RecSet("paginainicial")If Request.form("nome") = (vnome) thenIf Request.form("senha") = (vsenha) thenresponse.cookies("autenticacao")("anome") = request.form("nome")response.cookies("autenticacao")("asenha") = request.form("senha")response.clearresponse.redirect(vpaginainicial)end ifend ifrecset.movenextloopPublic Function DoLog(arquivo,nome,senha) Dim ObjFSO, ObjFile, ObjStream, Dia, Mes, Ano, Hora, IpNum Const forReading = 1, forWriting = 2, forAppending = 8 Const TriDef = -2, TriTrue = -1, TriFalse = 0 Set ObjFSO = CreateObject("Scripting.FileSystemObject") If ObjFSO.FileExists(arquivo) = False then objFSO.CreateTextFile(arquivo) End If Set ObjFile = objFSO.GetFile(arquivo) Set objStream = ObjFile.OpenAsTextStream(forAppending,TriDef) Dia = Day(Date()) Mes = Month(Date()) Ano = Year(Date()) Hora = Time() IpNum = Request.ServerVariables("REMOTE_ADDR") ObjStream.WriteLine Dia & "-" & Mes & "-" & Ano & " | " & Hora & " | " & IpNum & " --> " & " Nome: " & nome & " / Senha: " & senha ObjStream.close End Functionpath = Server.MapPath("log.txt")nome = Request.form("nome")senha = Request.form("senha")DoLog (path),(nome),(senha)%><b>LOGIN OU SENHA INVÁLIDOS</b><META HTTP-EQUIV="Refresh" CONTENT="1;URL=logon.asp">------------------Desculpa ter colocado ele inteiro, é que eu não manjo de ASP, então não sei onde tem que fazer as mudanças. Quem souber, por favor me indique.Muito ObrigadoClua Johnsonovoodoalbatroz@yahoo.com.br
Carregando comentários...