Cobrança Site ITAU ERRO criptografia
26/07/2018
0
Boa tarde Pessoal, Alguém poderia estar me ajudando?
Não tenho muita experiencia com código ASP...
Tenho criado a pagina index.html e geraboleto.asp
não estou conseguindo identificar o motivo para estar mostrando o seguinte erro:
__________________________________________________________________________________________________________________
Erro de compilação do Microsoft VBScript erro '800a0401'
Fim da instrução esperado
/boletosonline/geraboleto.asp, linha 16
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
___________________________________________________________________________________________________________________
Segue abaixo conteúdo da página index.html:
<!DOCTYPE html>
<html>
<head>
<title>Inform seu CNPJ ou CPF para emissão do Boleto</title>
<meta charset="utf-8">
<link rel="stylesheet" type="text/css" href="css/estilo.css">
</head>
<body>
<div id="container">
<form method="POST" action="geraboleto.asp">
<h3>Informe o CNPJ ou CPF para consulta dos poletos disponiveis. (informar somente os numeros!)</h3>
<div class="cnpj">
<input class="cnpj" type="text" name="codSacado" id="codSacado" required="required" maxlength="16"
placeholder="CNPJ OU CPF:">
</div>
<div>
<input class="submit" type="submit" value="ENVIAR">
</div>
</form>
</div>
</body>
</html>
Agora o conteudo da Pagina geraboleto.asp:
<html>
<head>
<title>Boletos Online</title>
<link rel="stylesheet" type="text/css" href="css/estilo.css">
</head>
<body>
<%
Dim dadosCripto, obj
codEmp = "**************************" (Aqui eu estou informado o código que peguei no site do ITAU)
Chave = "*************************" (Aqui eu estou informado a senha que peguei no site do ITAU)
codSacado = request.Form("codSacado")
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
%>
<dir id="container">
<form action="https://ww2.itau.com.br/2viabloq/pesquisa.asp" method="POST" name="form" onsubmit="carregabrw()" target="BLOQUETO">
<input type="hidden" name="DC" value="<%= dadosCripto %>">
<input type="hidden" name="msg" value="S">
<input class="submit" type="submit" name="Bloqueto" value="Segunda Via">
</form>
</dir>
<script language="JavaScript">
<!--
function carregabrw() {
window.open('','BLOQUETO',
'toolbar=yes,menubar=yes,resizable=yes,status=no,scrollbars=yes,left=0,top=0,width=600,height=430');
}
//-->
</script>
</body>
</html>
Oque pode estar ocasionando este erro.
Desde já, Muito Obrigado
Não tenho muita experiencia com código ASP...
Tenho criado a pagina index.html e geraboleto.asp
não estou conseguindo identificar o motivo para estar mostrando o seguinte erro:
__________________________________________________________________________________________________________________
Erro de compilação do Microsoft VBScript erro '800a0401'
Fim da instrução esperado
/boletosonline/geraboleto.asp, linha 16
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
___________________________________________________________________________________________________________________
Segue abaixo conteúdo da página index.html:
<!DOCTYPE html>
<html>
<head>
<title>Inform seu CNPJ ou CPF para emissão do Boleto</title>
<meta charset="utf-8">
<link rel="stylesheet" type="text/css" href="css/estilo.css">
</head>
<body>
<div id="container">
<form method="POST" action="geraboleto.asp">
<h3>Informe o CNPJ ou CPF para consulta dos poletos disponiveis. (informar somente os numeros!)</h3>
<div class="cnpj">
<input class="cnpj" type="text" name="codSacado" id="codSacado" required="required" maxlength="16"
placeholder="CNPJ OU CPF:">
</div>
<div>
<input class="submit" type="submit" value="ENVIAR">
</div>
</form>
</div>
</body>
</html>
Agora o conteudo da Pagina geraboleto.asp:
<html>
<head>
<title>Boletos Online</title>
<link rel="stylesheet" type="text/css" href="css/estilo.css">
</head>
<body>
<%
Dim dadosCripto, obj
codEmp = "**************************" (Aqui eu estou informado o código que peguei no site do ITAU)
Chave = "*************************" (Aqui eu estou informado a senha que peguei no site do ITAU)
codSacado = request.Form("codSacado")
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
%>
<dir id="container">
<form action="https://ww2.itau.com.br/2viabloq/pesquisa.asp" method="POST" name="form" onsubmit="carregabrw()" target="BLOQUETO">
<input type="hidden" name="DC" value="<%= dadosCripto %>">
<input type="hidden" name="msg" value="S">
<input class="submit" type="submit" name="Bloqueto" value="Segunda Via">
</form>
</dir>
<script language="JavaScript">
<!--
function carregabrw() {
window.open('','BLOQUETO',
'toolbar=yes,menubar=yes,resizable=yes,status=no,scrollbars=yes,left=0,top=0,width=600,height=430');
}
//-->
</script>
</body>
</html>
Oque pode estar ocasionando este erro.
Desde já, Muito Obrigado
Eduardo Castellini
Curtir tópico
+ 0
Responder
Posts
31/07/2018
Carlos Augusto
"Acho" que seu código neste trecho esta errado.
Troque
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
Para
Set obj = server.createobject("Itaucripto.cripto")
dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
Troque
Set obj = server.createobject("Itaucripto.cripto")dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
Para
Set obj = server.createobject("Itaucripto.cripto")
dadosCripto = obj.geraCripto(codEmp, codSacado, Chave)
Set obj = nothing
Responder
Clique aqui para fazer login e interagir na Comunidade :)