A <%=loja("nome_loja")%> utiliza o que há de mais moderno em soluções para manter a segurança durante sua compra.
Por isso, você irá efetuar o pagamento diretamente no Site Seguro da Visa , com tecnologia de SSL 128 bits e com envio codificado dos dados de seu cartão, não sendo armazenado
nenhuma informação como números, validades ou mesmo código de segurança, imediatamente destruídos logo após o processamento do pagamento. Tais informações serão processadas diretamente pela Verified by Visa.
Portando,
Sua compra na <%=loja("nome_loja")%> é segura!
Observação Importante: O pagamento será efetuado em uma nova janela.
Por favor, desabilite o Bloqueador Pop-up (janelas) para que possa prosseguir.
|
<%
parcelas = session("pagamento")
' Código de pagamento, formado pelo tipo de pagamento + número de parcelas
if parcelas = "v1" then
codpagto = "1001"
end if
if parcelas ="v2" then
codpagto = "2002"
end if
if parcelas ="v3" then
codpagto = "2003"
end if
if parcelas = "v4" then
codpagto = "2004"
end if
if parcelas = "v5" then
codpagto = "2005"
end if
if parcelas = "v6" then
codpagto = "2006"
end if
if parcelas = "v7" then
codpagto = "3007"
end if
if parcelas = "v8" then
codpagto = "3008"
end if
if parcelas = "v9" then
codpagto = "3009"
end if
if parcelas = "v10" then
codpagto = "3010"
end if
if parcelas = "v11" then
codpagto = "3011"
end if
if parcelas = "v12" then
codpagto = "3012"
end if
afiliacao = visa("filiacao")
tide = GerarTid(afiliacao,codpagto)
produtos = hash(cp("totalcompra"))
frete = hash(cp("frete"))
valor = 1 + produtos + frete - 1
tatlis = 1 + produtos + frete - 1
if cp("cupom") <> "" then
sql = "SELECT * FROM cupom WHERE codigo='"& hash(cp("cupom")) &"'"
set cpc = conexao.execute(sql)
if cpc("tipo")= "porcentagem" then
valortotal = tatlis - (tatlis * cpc("valor") / 100)
elseif cpc("tipo") = "dinheiro" then
valortotal = tatlis - cpc("valor")
end if
else
valortotal = tatlis
end if
set cpc= nothing
cadasdecimais = FormatNumber((valortotal),2)
valorcerto = Replace(cadasdecimais, ",", "")
valorcerto = Replace(valorcerto, ".", "")
loja=visa("cfgloja")
'INICIO DO CAMPO ORDER
set cliente = conexao.Execute("SELECT * from clientes WHERE email = '" & cp("clienteid") & "';")
VarConsumidor = hash(cliente("nome"))
VarEmail = hash(cliente("email"))
VarTel = "(" & hash(cliente("ddd")) & ") " & hash(cliente("tel"))
VarNome = hash(cliente("nome"))
VarEndereco = hash(cp("endentrega"))
VarBairro = hash(cp("bairroentrega"))
VarCidade = hash(cp("cidadeentrega"))
VarUF = hash(cp("estadoentrega"))
VarCep = hash(cp("cepentrega"))
VarMsg = ""
varDtEntrega = ""
subtotal = hash(cp("totalcompra"))
frete = hash(cp("frete"))
valortotal = 1 + subtotal + frete - 1
totalissimo = FormatNumber((valortotal),2)
total = totalissimo
order = "
Dados do consumidor:" & "
"
order = order & "
Nome: " & VarConsumidor & " - " & VarEmail & " - " & VarTel & "
"
order = order & " " & "
"
order = order & "
Dados de entrega:" & "
"
order = order & "
Tipo da Entrega: "& hash(cp("tipofrete")) &" - Nome: " & VarNome & " - " & VarEndereco & " - " & VarBairro & " - " & VarCidade & " - " & VarUF & " - " & VarCep & "
"
set pd = conexao.execute("SELECT * FROM pedidos WHERE idcompra='"&session("orderid")&"'")
funcao_prod = "
Produtos Comprados:
"
while not pd.eof
set pdto = conexao.execute("SELECT * FROM produtos WHERE idprod='"&pd("idprod")&"'")
funcao_prod = funcao_prod & pdto("nome")&" - R$ "&formatnumber(pdto("preco"),2)&"
"
pdto.close
set pdto = nothing
pd.movenext
wend
pd.close
set pd = nothing
order = order& funcao_prod & "
" & "
Valor pago pelo cliente: R$ "&cadasdecimais&"
Consulte mais detalhes no historico de compras sob o numero de pedido "&session("orderid")&""
ordercampo = order
'AQUI TERMINA O CAMPO ORDER
If valorcerto < 50000 Then
aut = "0"
Else
aut="1"
End If
%>
