<% If Application("tipoconfiguracao")="lojavirtual" Then If page = "recibo" and compra <> "negada" Then %> <%=Application("rightTxtAgradecimento")%> <% session("total") = Empty Else 'Verifica se já existe um pedido criado If session("id_transacao") <> "" Then If VerificaExistenciaArquivo(Application("DiretorioPedidos")&session("id_transacao")&".xml") Then varTotal = pegaValorAtrib(Application("DiretorioPedidos")&session("id_transacao")&".xml","dados_pedido","valor_total")*FatorCambio(pegaValorAtrib(Application("DiretorioPedidos")&session("id_transacao")&".xml","dados_pedido","valor_cambio")) Else varTotal = "" End If End If 'Verifica se o total da compra é zero If varTotal = "" Then %> Carrinho de compra: Vazio <% Else %> Carrinho de compra: <%=pegaValorAtrib(Application("DiretorioPedidos")&session("id_transacao")&".xml","dados_pedido","simbolo_moeda")%> <%=FormatNumber(pegaValorAtrib(Application("DiretorioPedidos")&session("id_transacao")&".xml","dados_pedido","valor_total")*FatorCambio(Replace(pegaValorAtrib(Application("DiretorioPedidos")&session("id_transacao")&".xml","dados_pedido","valor_cambio"),".",","))) %> <% End if End If End if %>