Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

[N] e o

Erro na hora de login..

Por , em ASP Clássico

Recommended Posts

[N] e o    0

[N] e o
Postado

eae....tudo bllz!?

 

tp..tô fazendo o sistema de login multinivel q tá coluna de asp do imasters..a pagina q faiz a verificação é essa:

 

<html><head><title>_. M E T T E O R A . . A D M I N . . C E N T E R ._ : : guestbook . . editar</title></head><body leftmargin="0" topmargin="0"><LINK REL="stylesheet" type="text/css" href="style.css"><script language="JavaScript">window.defaultStatus = "_. M E T T E O R A . . A D M I N . . C E N T E R ._"</script><%	dim login	dim senha	login = request.form("user")	senha = request.form("pass")	dim conecta	dim rs	dim localbd	set conecta = Server.CreateObject ("ADODB.Connection")	set rs = Server.CreateObject ("ADODB.Recordset")	localbd = "driver={Microsoft Access Driver (*.mdb)};dbq=" & "D:\Daniel\sites\metteora\mac\admin\database.mdb"	conecta.open localbd	rs.open "SELECT tbl_users.* FROM tbl_users WHERE tbl_users.login = '" & login & "' AND tbl_users.senha = '" & senha & "';", conecta	if rs.eof then  response.write ("<b>Usuário ou senha inválida!</b>")  response.end	end if	session("usernivel") = rs("nivel")	response.redirect "main.asp"%>

na hora em q eu logo..aparece o seguinte erro:

Objeto Response error 'ASP 0156 : 80004005' Erro de cabeçalho /mac/admin/login.asp, line 38 Os cabeçalhos HTTP já estão gravados no navegador cliente. Quaisquer modificações no cabeçalho HTTP devem ser feitas antes de gravar o conteúdo da página.

alguem sabe q erro é esse!?

flw..

Compartilhar este post

Link para o post
Compartilhar em outros sites

assuncao.jr    0

assuncao.jr
Postado

No incio da página coloque:

 

<%

Response.Buffer = False

Response.Expires = 0

%>

 

e

 

if rs.eof then

response.write ("<b>Usuário ou senha inválida!</b>")

response.end

Else

session("usernivel") = rs("nivel")

response.redirect ("main.asp")

End If

Compartilhar este post

Link para o post
Compartilhar em outros sites

[N] e o    0

[N] e o
Postado

coloquei assim no login.asp..

 

<%Response.Buffer = FalseResponse.Expires = 0%><html><head><title>_. M E T T E O R A . . A D M I N . . C E N T E R ._ : : guestbook . . editar</title></head><body leftmargin="0" topmargin="0"><LINK REL="stylesheet" type="text/css" href="style.css"><script language="JavaScript">window.defaultStatus = "_. M E T T E O R A . . A D M I N . . C E N T E R ._"</script><%	set conecta = Server.CreateObject ("ADODB.Connection")	conecta.provider = "Microsoft.Jet.OLEDB.4.0"	conecta.connectionstring = Server.Mappath("/database.mdb")	conecta.open	dim login	dim senha	login = request.form("user")	senha = request.form("pass")	SQL = "SELECT * FROM tbl_users WHERE login = '"&login&"' and '"&senha&"' "	set rs = conecta.execute(SQL)	if rs.eof then  response.write ("<b>Usuário ou senha inválida!</b>")  response.end	else  session("usernivel") = rs("nivel")  response.redirect ("main.asp")	end if%>
msm assim tá dando esse erro:

Objeto Response error 'ASP 0156 : 80004005' Erro de cabeçalho /mac/admin/login.asp, line 36 Os cabeçalhos HTTP já estão gravados no navegador cliente. Quaisquer modificações no cabeçalho HTTP devem ser feitas antes de gravar o conteúdo da página.
qual será o problema!?

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado
<%Response.buffer = True%>

 

<html>

<head><title>_. M E T T E O R A . . A D M I N . . C E N T E R ._ : : guestbook . . editar</title></head>

<body leftmargin="0" topmargin="0">

<LINK REL="stylesheet" type="text/css" href="style.css">

 

<script language="JavaScript">

window.defaultStatus = "_. M E T T E O R A . . A D M I N . . C E N T E R ._"

</script>

 

<%

set conecta = Server.CreateObject ("ADODB.Connection")

conecta.provider = "Microsoft.Jet.OLEDB.4.0"

conecta.connectionstring = Server.Mappath("/database.mdb")

conecta.open

 

dim login

dim senha

 

login = request.form("user")

senha = request.form("pass")

 

SQL = "SELECT * FROM tbl_users WHERE login = '"&login&"' and '"&senha&"' "

set rs = conecta.execute(SQL)

 

if rs.eof then

response.write ("<b>Usuário ou senha inválida!</b>")

else

session("usernivel") = rs("nivel")

response.clear

response.redirect ("main.asp")

end if

%>

Use o Response.Buffer = True no topo da página, e quando for redirecionar Response.clear!

Compartilhar este post

Link para o post
Compartilhar em outros sites

[N] e o    0

[N] e o
Postado

vlw ae pela ajuda....funcionou..mas tp..como q eu faço pra terminar a session..tp..excluir os cookies..pq tá acessando as paginas q nao sao para serem acessadas..msm após ter saído..alguem poderia me explicar ou dizer aonde tem um tuto explicando!?flw..

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Para limpar ou "zerar" uma session: Session("nome_da_session")="" ou Session("nome_da_session").abandon

Compartilhar este post

Link para o post
Compartilhar em outros sites

[N] e o    0

[N] e o
Postado

vlw ae salgado..

mas eu coloquei assim:

session("usernivel").abandon

 

 

e deu esse erro no logout.asp:

Erro de tempo de execução do Microsoft VBScript error '800a01a8' Objeto necessário: '[number: 3]' /mac/admin/logout.asp, line 40
alguem sabe q erro é esse!?

Compartilhar este post

Link para o post
Compartilhar em outros sites

Salgado    4

Salgado
Postado

Muda para: session("usernivel")=""

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito