Assinar:
Postagens (Atom)
skip to main |
skip to sidebar
INFORMAÇÕES
TEMOS TODOS OS PRODUTOS A PRONTA ENTREGA, PARA MARINGÁ E REGIÃO FASEMOS ENTREGA A DOMICILIO.
PEDIDOS E INFORMAÇÕES (44)8852-4398
ENCOREDESIGNE@HOTMAIL.COM
PEDIDOS E INFORMAÇÕES (44)8852-4398
ENCOREDESIGNE@HOTMAIL.COM
Pessoal o calculador de FRETE ainda não esta funcionando.
Em Breve Os produtos terão as dimensões e peso, assim você mesmo poderá calcular seu frete sem sair do site.
Obrigado.
Obrigado.
Calcule Frete
Cep Origem:
Cep Destino:
Peso:
Serviço:
Valor:
<% iF Request.QueryString("erro") = empty then Response.Write("Serviço: " & Request.QueryString("Servico") & "
") Response.Write("Cep de Origem: " &Request.QueryString("ceporig") & "
") Response.Write(Request.QueryString("UFOrigem") & "-") Response.Write(Request.QueryString("maringá")& "
") Response.Write("Cep de Destino: " &Request.QueryString("cepDestino") & "
") Response.Write(Request.QueryString("UFDestino") & "-") Response.Write(Request.QueryString("LocalDestino")& "
") Response.Write("Peso: " &FormatNumber(Replace(Request.QueryString("peso"),".",",")) & " Kg
") Response.Write("Mão Propria: " &FormatCurrency(Replace(Request.QueryString("MaoPropria"),".",",")) & "
") Response.Write("Aviso de Recebimento: " &FormatCurrency(Replace(Request.QueryString("avisoRecebimento"),".",",")) & "
") Response.Write("Valor Total: " &FormatCurrency(Replace(Request.QueryString("tarifa"),".",","))& "
") else response.Write(request.QueryString("erro")) end if %>
Cep Destino:
Peso:
Serviço:
Valor:
<% iF Request.QueryString("erro") = empty then Response.Write("Serviço: " & Request.QueryString("Servico") & "
") Response.Write("Cep de Origem: " &Request.QueryString("ceporig") & "
") Response.Write(Request.QueryString("UFOrigem") & "-") Response.Write(Request.QueryString("maringá")& "
") Response.Write("Cep de Destino: " &Request.QueryString("cepDestino") & "
") Response.Write(Request.QueryString("UFDestino") & "-") Response.Write(Request.QueryString("LocalDestino")& "
") Response.Write("Peso: " &FormatNumber(Replace(Request.QueryString("peso"),".",",")) & " Kg
") Response.Write("Mão Propria: " &FormatCurrency(Replace(Request.QueryString("MaoPropria"),".",",")) & "
") Response.Write("Aviso de Recebimento: " &FormatCurrency(Replace(Request.QueryString("avisoRecebimento"),".",",")) & "
") Response.Write("Valor Total: " &FormatCurrency(Replace(Request.QueryString("tarifa"),".",","))& "
") else response.Write(request.QueryString("erro")) end if %>