Guest Jomar Postado Setembro 17, 2003 Denunciar Share Postado Setembro 17, 2003 Estou com problema..com session..ainda não entendi bem..este lance..O erro que está acontedendo é este:Erro de compilação do Microsoft VBScript error '800a03f6' 'End' esperado /editora/web/carrinho.asp, line 16 O que devo fazer...já tentei alterar e deu errado..alguém poderia finalizar está código para mim...onde coloco o endMeu código:<%Sub Session_OnStartstrKey = CInt(Request.QueryString("obra"))if Session("pedido").Exists(strKey) then%><script language="VBScript"> msgbox "Pedido enviado com sucesso. Assim que possível entraremos em contato" Window.location.href="default.asp" </script><%else Session("pedido").Add CInt(Request.QueryString("obra")), 1 Response.Redirect "default.asp?pagina=" & Request.QueryString("pagina")end if%> Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 pgmador Postado Setembro 17, 2003 Denunciar Share Postado Setembro 17, 2003 Acho que o certo é isso aí embaixo<%Sub Session_OnStart {strKey = CInt(Request.QueryString("obra"))if Session("pedido").Exists(strKey) then%><script language="VBScript">msgbox "Pedido enviado com sucesso. Assim que possível entraremos em contato"Window.location.href="default.asp"</script><%elseSession("pedido").Add CInt(Request.QueryString("obra")), 1Response.Redirect "default.asp?pagina=" & Request.QueryString("pagina")end if}%>Se não der certo, procure ver como você dá o end da sub que você está fazendo.[]´sNelson Soareshttp://www.ondagospel.com.br Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Lucky Postado Setembro 18, 2003 Denunciar Share Postado Setembro 18, 2003 para usar um comando "redirect" tu tem que colocar na primeira linha do teu arquivo.asp o comando buffer=true ou algo assim para que a página só seja enviada ao navegador depois de ser totalmente processada...O que acontece é que uma parte da página pode estar sendo enviada ao browser e depois disso ela é redirecionada para outra página...com o buffer=true ele processa toda a página, inclusive os redirect e depois larga no buffer, dai nenhuma parte da página fica faltando...tenta ai e se não for este o comando é algo parecido...(se alguém sabe, ajuda...) Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest Jomar
Estou com problema..com session..ainda não entendi bem..este lance..
O erro que está acontedendo é este:
Erro de compilação do Microsoft VBScript error '800a03f6'
'End' esperado
/editora/web/carrinho.asp, line 16
O que devo fazer...já tentei alterar e deu errado..
alguém poderia finalizar está código para mim...onde coloco o end
Meu código:
<%
Sub Session_OnStart
strKey = CInt(Request.QueryString("obra"))
if Session("pedido").Exists(strKey) then
%>
<script language="VBScript">
msgbox "Pedido enviado com sucesso. Assim que possível entraremos em contato"
Window.location.href="default.asp"
</script>
<%
else
Session("pedido").Add CInt(Request.QueryString("obra")), 1
Response.Redirect "default.asp?pagina=" & Request.QueryString("pagina")
end if
%>
Link para o comentário
Compartilhar em outros sites
2 respostass 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.