<% session("sotransportadora") = "nao" if session("usuario") = "" then link = "login.asp?ir=executar.asp?ir=entrega" else link = "executar.asp?ir=entrega" end if %> <%=loja("nome_loja") &" - "& loja("slogan_loja")%>
<% 'Chama os produtos comprados set pedidos = conexao.Execute("SELECT * FROM pedidos WHERE idcompra='" & intOrderID & "'") if pedidos.eof then Session("orderID") = "" %> <%else%>
Seu carrinho de compras está vazio!

Confira abaixo o(s) produto(s) comprados e seus respectivos valores.
Para alterar a quantidade comprada de um produto, digite a nova quantidade no campo "QTN" e clique em "OK"
Para remover um produto de seu carrinho de compras, clique na lixeira que está ao lado direito da listagem.
Digite o CEP para saber o valor do frete e fechar o seu pedido.

<%if request("erro") <> "" then response.write "

"&request("erro")&"

"%>

 
<%while not pedidos.eof set prod = conexao.execute("SELECT * FROM produtos WHERE idprod='"&pedidos("idprod")&"'") if prod("transportadora")="Sim" then session("sotransportadora")="Sim" end if pesototal = 1 + FormatNumber(pesototal, 3) + FormatNumber((prod("peso") * pedidos("quantidade")), 3) - 1 Session("PesoTotalFrete") = FormatNumber(pesototal, 3) if prod("moeda") = "dolar" then preco_produto = formatNumber(prod("preco")*loja("cotacao_dia"), 2) else preco_produto = formatNumber(prod("preco"), 2) end if totalumprod = formatNumber(pedidos("quantidade") * preco_produto,2) totalprod = formatnumber(1 + totalprod + totalumprod - 1,2) session("total_produtos") = totalprod valortotaldacompra = 1 + session("PesoTotalValor") + totalprod - 1 if session("utilizando_cupomdesconto") = "sim" then if session("tipo_cpdesconto") = "dinheiro" then valortotal = 1+session("PesoTotalValor")+totalprod-session("valor_cpdesconto")-1 else valortotal = 1 + session("PesoTotalValor")+totalprod - (1 + session("PesoTotalValor")+totalprod * session("valor_cpdesconto") / 100) end if else valortotal = 1 + session("PesoTotalValor") + totalprod - 1 end if %> <%if prod("transportadora")="Sim" then%> <%end if%> <%pedidos.movenext wend%>
Qtn.
Foto
Produto
R$ Un.
Total
Del
);" value="<%=pedidos("quantidade")%>" size="1" maxlength="2" /> "> ">
<% If len(cstr(prod.fields("foto1")))<3 or prod("foto1") = "grande.gif" then foto1="pequena.gif" else foto1=prod.fields("foto1") end if%> &produto=<%=prod("idprod")%>"><%= prod("nome") %>
Peso: <%=formatnumber(prod("peso"),2)%> kg
<%= loja("moeda") & " " & formatnumber(preco_produto,2) %>
<%=loja("moeda") & " " &formatnumber(totalumprod,2)%>
<% 'Inicio das Especificacoes Sql_especifica = "SELECT * FROM pedidos WHERE idcompra='"&session("orderID")&"' and idprod='"&prod("idprod")&"' AND especificacoes = '"&pedidos("especificacoes")&"';" set rs = conexao.execute(Sql_especifica) if not rs.eof then Sql2 = "SELECT titulo, valor FROM produtos_especificacoes_detalhes WHERE id_especificacao = "&pedidos("especificacoes")&";" set rs2 = conexao.execute(SQL2) if not rs2.eof then while not rs2.eof response.Write(""&rs2("titulo")&": "&rs2("valor")&" ") rs2.movenext wend end if rs2.close end if rs.close 'Fim das Especificacoes %>
  Não cobramos frete
 
Digite o CEP do local de entrega:
" maxlength="5" /> - " maxlength="3" />         Não sabe o CEP?

<%if session("PesoTotalCep") <> "" then %> <%if session("Frete_sedex") <> 0 and loja("utilizar_sedex")="Sim" and session("sotransportadora") <> "Sim" then %> <%end if%> <%if session("Frete_sedex_10") <> 0 and loja("sedex_10")="Sim" and session("sotransportadora") <> "Sim" then%> <%end if%> <%if session("Frete_sedex_cobrar") <> 0 and loja("sedex_cobrar")="Sim" and session("sotransportadora") <> "Sim" then%> <%end if%> <%if loja("utilizar_encomenda") = "Sim" and session("Frete_encomenda") <> "nao" and session("Frete_encomenda") <> "" and session("sotransportadora") <> "Sim" then%> <%end if%><% if loja("carta_registrada") = "Sim" and Session("PesoTotalFrete") < 0.500 then %> <%end if if loja("transportadora") = "Sim" then %> <%end if%> <%if session("motoboy") = True and session("sotransportadora") <> "Sim" then%> <%end if%>
Selecione uma das formas de envio disponíveis para: <%=session("Frete_local")%> | Peso Total: <%=formatnumber(Session("PesoTotalFrete"),2)%> kg
> Transportadora - Entregamos e instalamos o equipamento sem nenhum custo.
<%end if%> <%if session("utilizando_cupomdesconto") = "sim" then%> <% end if%>
Se você possui um cupom desconto informe-o aqui: " size="30" />
O seu cupom lhe dará direito à <% if session("tipo_cpdesconto") = "porcentagem" then response.write " "&session("valor_cpdesconto")&"%" elseif session("tipo_cpdesconto") = "dinheiro" then response.write " R$ "&formatnumber(session("valor_cpdesconto"),2)&"" end if %> de desconto no valor total da compra!
Produtos: R$ <%=totalprod%> <%session("totalcompra1") = totalprod %>
Frete: R$ <%response.Write FormatNumber(session("PesoTotalValor"), 2)%> Valor total: R$ <%response.Write FormatNumber(valortotaldacompra, 2)%> Total da Compra : R$ <%response.Write FormatNumber(valortotal, 2)%>

<%if request("atualiza") = "ok" and session("PesoTotalValor") <> "" then%>
<%end if%> <%end if%>
 
<%response.write google_analytics%> <%fecha_banco%>