Gafanhoto Postado Setembro 25, 2005 Denunciar Share Postado Setembro 25, 2005 Tudo que me disseram foi para colocar no script:<%Response.CacheControl = "no-cache"Response.AddHeader "Pragma", "no-cache"ou entãoresponse.buffer = True%>Mas continua dando o mesmo erro.Response object error 'ASP 0156 : 80004005' Header Error /compras/login.asp, line 8 The HTTP headers are already written to the client browser. Any HTTP header modifications must be made before writing page content. alguém pode ajudar?Meu codigo é esse:<html><font face="Verdana, Arial, Helvetica, sans-serif" size="-2"><!--#include file="conexao.asp"--><%Response.CacheControl = "no-cache"Response.AddHeader "Pragma", "no-cache"response.buffer = True%><% botao = Trim(Request.QueryString("botao")) if (botao) = "Ok" then login = Trim(Request.QueryString("login")) senha = Trim(Request.QueryString("senha")) set rs = Server.CreateObject("ADODB.RecordSet") query = "select login, senha, nomeCliente, clienteId from cliente where login='"&login&"' and senha='"&senha&"'" set rs = Connect.Execute(query) if rs.EOF then response.write("<center><font color='red'>Usuario e/ou senha invalida!") end if if not rs.EOF then nome = rs(2) idCliente = rs(3) dataPedido = date sessao = session.SessionID & date set rec_ins = Server.CreateObject("ADODB.RecordSet") query_ins = "insert into pedido (clienteId, dataPedido, sessionId) values ('"&idCliente&"', '"&dataPedido&"', '"&sessao&"')" set rec_ins = Connect.Execute(query_ins) response.Redirect("finalizaPedido.asp?nome="&nome&",id="&idCliente&"") end if end if%><head><title>login</title></head><body><div align="center"><font color="#000000" size="-2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Inisra nos campos abaixo seu login e sua senha para finalizar seu pedido.</strong></font><br> <br></div><form action="login.asp" method="get"> <div align="center"><strong><font color="#000000" size="-2" face="Verdana, Arial, Helvetica, sans-serif">Login : <input type="text" name="login"> Senha : <input type="password" name="senha"> <input type="submit" value="Ok" name="botao"> </font></strong> </div></form><div align="center"><br> <br> <br> <font color="#333333" size="-2" face="Verdana, Arial, Helvetica, sans-serif">Se você ainda não está cadastrado, <a href="insereCliente.asp">clique aqui!</a> </font> </div></body></html> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Deividy Postado Setembro 25, 2005 Denunciar Share Postado Setembro 25, 2005 então colocar isso aiResponse.CacheControl = "no-cache"Response.AddHeader "Pragma", "no-cache"ou entãoresponse.buffer = Trueantes do htmldepois que a página entra isso dá erro mesmo! Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Gafanhoto
Tudo que me disseram foi para colocar no script:
<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
ou então
response.buffer = True
%>
Mas continua dando o mesmo erro.
Response object error 'ASP 0156 : 80004005'
Header Error
/compras/login.asp, line 8
The HTTP headers are already written to the client browser. Any HTTP header modifications must be made before writing page content.
alguém pode ajudar?
Meu codigo é esse:
<html>
<font face="Verdana, Arial, Helvetica, sans-serif" size="-2">
<!--#include file="conexao.asp"-->
<%
Response.CacheControl = "no-cache"
Response.AddHeader "Pragma", "no-cache"
response.buffer = True
%>
<%
botao = Trim(Request.QueryString("botao"))
if (botao) = "Ok" then
login = Trim(Request.QueryString("login"))
senha = Trim(Request.QueryString("senha"))
set rs = Server.CreateObject("ADODB.RecordSet")
query = "select login, senha, nomeCliente, clienteId from cliente where login='"&login&"' and senha='"&senha&"'"
set rs = Connect.Execute(query)
if rs.EOF then
response.write("<center><font color='red'>Usuario e/ou senha invalida!")
end if
if not rs.EOF then
nome = rs(2)
idCliente = rs(3)
dataPedido = date
sessao = session.SessionID & date
set rec_ins = Server.CreateObject("ADODB.RecordSet")
query_ins = "insert into pedido (clienteId, dataPedido, sessionId) values ('"&idCliente&"', '"&dataPedido&"', '"&sessao&"')"
set rec_ins = Connect.Execute(query_ins)
response.Redirect("finalizaPedido.asp?nome="&nome&",id="&idCliente&"")
end if
end if
%>
<head>
<title>login</title>
</head>
<body>
<div align="center"><font color="#000000" size="-2" face="Verdana, Arial, Helvetica, sans-serif"><strong>Inisra
nos campos abaixo seu login e sua senha para finalizar seu pedido.</strong></font><br>
<br>
</div>
<form action="login.asp" method="get">
<div align="center"><strong><font color="#000000" size="-2" face="Verdana, Arial, Helvetica, sans-serif">Login
:
<input type="text" name="login">
Senha :
<input type="password" name="senha">
<input type="submit" value="Ok" name="botao">
</font></strong> </div>
</form>
<div align="center"><br>
<br>
<br>
<font color="#333333" size="-2" face="Verdana, Arial, Helvetica, sans-serif">Se você ainda não está cadastrado, <a href="insereCliente.asp">clique
aqui!</a> </font> </div>
</body>
</html>
Link para o comentário
Compartilhar em outros sites
1 resposta a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.