Anunciar todos seus produtos no Buscapé de graça? Sim, acreditem, isso é real!

Sempre usei o PagSeguro Uol como solução de pagamentos, porém recentemente fiquei sabendo que é possível anunciar todos os seus produtos no Buscapé gratuitamente. Mas para isso é necessário ter o Pagamento Digital como sua forma de pagamento exclusiva.

Para quem não conhece, o Pagamento Digital é muito semelhante ao PagSeguro da Uol, porém é um serviço da empresa Buscapé, um dos maiores sites de comparação de preços da América Latina. E quando você usa apenas essa forma de pagamento em sua loja, tem o direito de anunciar todos os seus produts lá gratuitamente.

Com o Pagamento digital você pode oferecer ao seu cliente várias opções de parcelamento:

E mesmo que seu cliente parcele em várias vezes no cartão, você receberá, após 14 dias, o valor integral da venda.

Quanto à mensalidade do serviço, não há com o que se preocupar. Você só paga quando vende. É uma taxa de aproximadamente 6,4% (clique aqui e veja as taxas atuais)

Outra vantagem do Pagameto Digital é o Selo de Reputação:

Com este selo você exibe em sua loja todas as suas avaliações recebidas em outras negociações. É uma ferramenta de fácil instalação e com um grande impacto de marketing. Tendo ele em exibição na sua loja o cliente poderá ver a porcentagem de transações positivas, o que é muito bom, pois passa confiança a quem está comprando.

Está esperando o que para anunciar no Buscapé? Vamos lá, não custa nada!

Related posts:

1. Retorno de pagamento Pagseguro para Loja Exemplo
2. Como fazer um e-commerce?
3. Como atualizar o drive de conexão mysql de sua loja.

Estava olhando em posts antigos no forum.locaweb.com.br e achei uma contribuição interessante do usuario Marcio Soares. O link do post é: http://forum.locaweb.com.br/showthread.php?t=4889&highlight=ADM_lista_produtos_vendidos.asp

Para adicionar em sua loja basta baixar o arquivo clicando aqui e adicionar dentro da pasta painelctrl de sua loja.

Abra o arquivo “painelctrl/ADM_menu.asp” e adicione o trecho em vermelho:

<tr>

<td valign=”center”><B><font color=”#cc0000″>RELATÓRIOS</font></B></td>

</tr>

<tr>

<td>

<a href=”ADM_lista_usuario.asp?status=compraram”>Usuários compradores</a><br>

<a href=”ADM_lista_usuario.asp?status=naocompraram”>Usuários cadastrados</a><br>

<a href=”ADM_relatorio.asp”>Buscar Pedidos</a>

<a href=”ADM_lista_produtos_vendidos.asp”>Produtos Vendidos</a>

</td>

</tr>

Feito!

Obrigado pela contribuição Marcio.

Até a próxima!

Related posts:

1. Retirar calculo de frete do PagSeguro mantendo o calculado pela loja (sistema Loja Exemplo)
2. Como criar uma pagina só com produtos em promoção – Loja Exemplo
3. Visualização do estoque ao pesquisar produtos na Loja Exemplo.

Algo que muitas vezes acontece (e eu considero bem chato) é quando o cliente entra em uma loja com muitas categorias, porém várias delas estão sem nenhum produto cadastrado. Isso pode gerar uma desistência do cliente em navegar em sua loja.

Como lojistas, vemos como sendo mais prático cadastrar todas as categorias para só depois ir colocando os produtos. E é isso que causa o desconforto citado acima.

Para resolver este problema, esse script permitirá cadastrar as categorias à vontade, e só vão aparecer na loja as categorias que já tiverem algum produto cadastrado, evirando assim que o cliente entr em categorias vazias.

Entre no arquivo “funcoes.asp” e procure a “função menu_categorias()”. Adicione o trecho vermelho:

Else

‘Loop dos registros encontrados na tebela categorias

DO UNTIL  RS_Categorias.EOF

‘ ######################## trecho retira categoria

Set RS_Produtos_categoria = Server.CreateObject(“ADODB.Recordset”)

Set RS_Produtos_categoria.ActiveConnection = Conexao

RS_Produtos_categoria.CursorLocation = 3

RS_Produtos_categoria.CursorType = 0

RS_Produtos_categoria.LockType =  1

‘Executa a query de consulta

RS_Produtos_categoria.Open “SELECT codigo_categoria FROM Produtos WHERE codigo_categoria = ” & RS_Categorias(“codigo_categoria”) & ” AND disponivel=1 “

if not RS_Produtos_categoria.EOF Then

‘ ######################## fim trecho retira categoria

‘Atribui o calor do codigo_categoria a session(“codigo_categoria”)

session(“codigo_categ”) = RS_Categorias(“codigo_categoria”)

‘Query de consulta a tabela subcategorias

Query_subcategorias = “SELECT codigo_chave, codigo_subcategoria, codigo_categoria, nome_subcategoria, descricao_subcategoria, sigla_idioma FROM Subcategorias WHERE codigo_categoria = ” & session(“codigo_categ”) & ” AND sigla_idioma = ‘”&varLang&”‘ ORDER BY nome_subcategoria”

Um pouco mais abaixo, adicione o trecho em vermelho:

‘Loop dos registros encontrados na tebela categorias

DO UNTIL  RS_SubCategorias.EOF

‘ ######################## trecho retira subcategoria

Set RS_Produtos_subcategoria = Server.CreateObject(“ADODB.Recordset”)

Set RS_Produtos_subcategoria.ActiveConnection = Conexao

RS_Produtos_subcategoria.CursorLocation = 3

RS_Produtos_subcategoria.CursorType = 0

RS_Produtos_subcategoria.LockType =  1

‘Executa a query de consulta

RS_Produtos_subcategoria.Open “SELECT codigo_subcategoria FROM Produtos WHERE codigo_subcategoria = ” & RS_SubCategorias(“codigo_subcategoria”) & ” AND disponivel=1 “

if not RS_Produtos_subcategoria.EOF Then

‘ ######################## fim trecho retira subcategoria

If CDbl(RS_SubCategorias(“codigo_subcategoria”)) = CDbl(request(“codigo_subcategoria”)) Then

Response.write “&nbsp;&nbsp;<span class=’MNlatesquerdaAtivo’>-</span> <a href=’produtos.asp?lang=”&varLang&”&tipo_busca=subcategoria&codigo_categoria=”&RS_Categorias(“codigo_categoria”)&”&codigo_subcategoria=”&RS_SubCategorias(“codigo_subcategoria”)&”‘ class=’MNlatesquerdaAtivo’>” & RS_SubCategorias(“nome_subcategoria”) & “</a></span><br>”

Else

Response.write “&nbsp;&nbsp;<span class=’MNlatesquerda’>-</span> <a href=’produtos.asp?lang=”&varLang&”&tipo_busca=subcategoria&codigo_categoria=”&RS_Categorias(“codigo_categoria”)&”&codigo_subcategoria=”&RS_SubCategorias(“codigo_subcategoria”)&”‘ class=’MNlatesquerda’>”& fontcolor & RS_SubCategorias(“nome_subcategoria”) & “</a></span><br>”

End if

‘ ######################## trecho retira subcategoria

End if  ’ fim do loop da função sumir subcategoria

RS_Produtos_subcategoria.Close

Set RS_Produtos_subcategoria = Nothing

‘ ######################## fim trecho retira subcategoria

RS_SubCategorias.MoveNext

LOOP

%>

</td>

</tr>

<%

End If

%>

<tr>

<td><img src=”config/templates/<%=varLang%>/<%=varSkin%>/regua1×1.gif” height=”1″></td>

</tr>

</table>

<%

‘Fecha e libera da memória o objeto de Recordset de consulta a tabela Subcategorias

RS_SubCategorias.Close

Set RS_SubCategorias = Nothing

‘ ######################## trecho retira categoria

End if  ’ fim do loop da função sumir categoria

RS_Produtos_categoria.Close

Set RS_Produtos_categoria = Nothing

‘ ######################## fim trecho retira categoria

RS_Categorias.MoveNext

Feito.

OBS: NÃO COPIE E COLE OS CÓDIGOS DO POST. ESTE É SÓ PARA REFERENCIA.  UM DOS PROBLEMAS QUE VAI DAR SE TENTAR COPIAR O CÓDIGO DO POST É COM RELAÇÃO ÀS ASPAS, QUE NO POST ESTÃO ASSIM ” POR PADRÃO. PARA EVITAR ERROS, REDIGITE AS ASPAS NO CÓDIGO.

Até a próxima!

Abraço.

Related posts:

1. Como criar uma pagina só com produtos em promoção – Loja Exemplo
2. Visualização do estoque ao pesquisar produtos na Loja Exemplo.
3. Modificação LojaExemplo “como trocar a categoria de um produto depois de cadastra-lo”

O sistema de e-commerce Magento é hoje um dos mais conhecidos. O sistema é espetacular! Já vem com muitas funcionalidades que possibilitam a qualquer lojista uma grande flexibilidade sem precisar gastar nada.

A quantidade de módulos e template grátis na internet também é consideravel, já que o sistema é conhecido mundialmente. Mas mesmo as soluções comerciais pode se encontrar em um preço bom.

Para o lojista que quer um sistema de ultima geração, esse sistema (na minha opinião) é o mais indicado. Já trabalhei com o sistema Loja Exemplo (da Locaweb), osCommerce, PrestaShop, e confesso que o Magento é o que mais me impressionou. Comecei a focar nele recentemente e pretendo compartilhar aqui as principais dicas para que consiga instalar e conhecer o sistema. Conforme eu for aprendendo, compartilharei pelo blog. Recomendo muito esse sistema, principalmente se você pretende expandir seus negócios, pois é um sistema muito robusto, e pelo que pesquisei tem ótima performace.

Abaixo está um video de instalação do Magento muito bom que me foi muito util. Quem criou o vídeo foi o Robson, e é uma sequencia de 6 video-aulas maravilhosos.  Postarei apenas os dois primeiros vídeos aqui, mas deixarei o link de todas no final do post. Desde já agradeço muito ao Robson por ter disponibilizado essa ajuda que me foi bem importante.

Aula 01 – Traduzindo, configurando e instalando:

Loja Virtual com Magento Aula 01: Baixando, traduzindo, configurando servidor e instalando loja virtual from upinside on Vimeo.

Aula 02 -Produtos, categorias e CMS da página inicial:

Loja Virtual com Magento Aula 02: Produtos, categorias e CMS da página inicial from upinside on Vimeo.

Para quem deseja acompanhar todas as video-aulas, seguem os links:

Video aula 1:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-01-baixando-traduzindo-configurando-e-instalando

Video aula 2:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-02-produtos-categorias-e-cms-da-pagina-inicial

Video aula 3:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-03-instalando-plugins-e-temas

Video aula 4:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-04-estados-do-brasil-calculo-de-frete-modulos-de-pagamento

Video aula 5:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-05-configuracoes-gerais-troca-de-logomarcas-emails-de-transicao

Video aula 6:

http://www.upinside.com.br/video-aulas/loja-virtual-com-magento-aula-06-gerenciando-sidebars-adicionar-remover-criar-widgets

Abraço e até a próxima!

Related posts:

1. Como deixar título e metatag de descrição dinâmicos no sistema lojaexemplo da Locaweb

Esse post foi baseado nos códigos do Alexandre de Luccia deste post.

O formato que vou disponibilizar seria diferente da forma como esta o código original. Ficará assim:

Bom vamos lá!!

Baixe o arquivo feed.asp

Logo no começo do arquivo “feed.asp” adicione o endereço de feed de seu blog na parte em vermelho:

<%

‘ Script ASP Para leitura de arquivos de RSS.

url = “http://www.surgimento.com.br/feed/” ‘Aqui vai o endereço do arquivo RSS, ou do arquivo “gerador”

‘ Criando Objeto XML

Set objXML = Server.CreateObject(“msxml2.DOMDocument.3.0″)

objXML.async = false

No trecho abaixo pode mudar a quantidade de links que deseja que apareça:

‘Definindo quantidade de notícias que será exibida

if contador < 5 then

contador = contador + 1

Pode adicionar os links onde desejar em sua loja,  é só adicionar o trecho todo abaixo (o marcado em vermelho é o caminho onde colocou o feed.asp no meu caso deixei na raiz):

<!– #INCLUDE FILE = “feed.asp” –>

Agora é só formar a aparencia do código baseado no layout que tem.

Abraço e até a próxima.

Related posts:

1. Como mostrar quantidade de itens no carrinho da Loja Exemplo
2. Como mostrar prazo de entrega para o cliente Loja Exemplo.
3. Como criar uma pagina só com produtos em promoção – Loja Exemplo

Estarei mostrando como fazer importação dos dados de uma Loja Exemplo versão 6.5 para outra da mesma versão.

AVISO: isso não irá funcionar em lojas de versão diferente ou em lojas que sejam 6.5 mas que tenham alguma modificão nas tabelas. As mesmas devem ter exatamente a mesma estrutura. Aqui mostro apenas como importar dados de lojas de mesma base. A migração de dados é outra história por trazer dados de uma base um pouco diferente do que já existe. Ou seja, o profissional precisa repassar todas as tabelas campo por campo e igualar toda a estrutura das bases de dados para só assim trazer os dados. É um serviço trabalhoso e cobrado pelos programadores.

Bom vamos lá!

Entre no painel de controle de sua hospedagem, e abaixo do texto “Hospedagem de sites” clique em “Gerenciar Hospedagem”:

Logo após, clique no ícone do Myqsl:

Agora serão carregadas todas as bases de dados que possui na hospedagem. Para aparecer a configuração delas, clique na seta preta correspondente à base de dados que deseja administrar.

Clique no botão “Administrar” :

Abrirá uma janela pedindo o login (que pode ser visto na tela anterior, antes de clicar em “Administrar”) e a senha do banco de dados. Normalmente quando a base de dados é criada a senha é a mesma da hospedagem.

Com as bases abertas clique na tabela que deseja importar os dados:

Logo após clique em “exportar” :

Deixe tudo da forma como está abaixo, desmarcando tudo que esta marcardo no bloco de estrutura e marcando “Inserções completas”:

Selecione abaixo a opção “Enviado” e clique em executar :

Agora salve o arquivo e abra o banco de dados que quer adicionar os produtos exportados. No outro banco de dados, clique na mesma tabela que vai importar, carregue o arquivo SQL que exportou a pouco, e mantenha os dados como na imagem abaixo e clique em “executar”.

Fazendo isso lembre-se de copiar toda a pasta “config/imagens_conteudo”  pelo FTP da nova loja.

O processo explicado acima é apenas uma possibilidade de como fazer. Existem muitas formas de fazer essa importação. Caso não queira perder tempo fazendo isso tabela por tabela, pode exportar tudo de uma vez clicando na base de dados, ao invés de uma ou outra tabela. Seguindo os mesmos passos você irá exportar e importar todas as tabelas em apenas um passo.

Abraço, e até a próxima.

Related posts:

1. Como fazer backup de seu banco de dados Mysql na hospedagem locaweb.
2. Como fazer categorias que não tem produtos desaparecer da loja – Loja Exemplo
3. Como fazer um e-commerce?

Respondendo ao post:

http://forum.locaweb.com.br/showthread.php?t=2242

Atualmente, quando se instala o módulo de PagSeguro Uol na Loja Exemplo, se não configurar a opção certa no PagSeguro o mesmo faz o cálculo do frete e ignora o calculado na loja. Para evitar isso entre em sua conta do PagSeguro e clique em “Preferencias”, e depois em “frete”:

Agora é necessário escolher a 3º opção “Frete adicional com valor fixo” com o campo “Valor fixo para os itens adicionais”, marcado com R$ 0,00 como mostrado na imagem abaixo:

Com isso o PagSeguro não irá calcular o frete, e irá permanecer o valor calculado na loja.

Espero ter ajudado.

Até mais!

Related posts:

1. Resolução problema de calculo de frete (E-sedex) do sistema Loja Exemplo
2. Retorno de pagamento Pagseguro para Loja Exemplo
3. Como resolver problema ao atualizar o frete personalizado da Loja Exemplo.

Caso queira adicionar um banner na sua loja que quando clicado carregue todos os produtos que estão marcados como “promoção” no administrativo siga esse post. Além do banner, poderá também deixar em cima das categorias de sua loja como se fosse uma delas. Com isso você pode mostrar o mesmo produto tanto na categoria que foi cadastrado quanto no link de promoções.

Para deixar um link logo acima das categorias como na imagem acima, abra o arquivo “funcoes/funcoes.asp” e adicione os trechos em vermelho:

RS_Categorias.Open Query_categorias

If  RS_Categorias.EOF then

%>

<table width=”172″ cellpadding=”0″ cellspacing=”0″>

<tr>

<td style=”padding-top:2px;padding-bottom:2px;padding-left:10px;padding-right:10px”><%= Application(“MenuTxtCatVazio”)%></td>

</tr>

</table>

<%

Else

%>

<table width=”172″ cellpadding=”0″ cellspacing=”0″>

<tr>

<td style=”padding-top:2px;padding-bottom:2px;padding-left:10px;padding-right:10px”><img src=”config/templates/<%=varLang%>/<%=varSkin%>/seta.gif” width=”6″ height=”7″ border=”0″>&nbsp;&nbsp;<a href=”produtos.asp?tipo_busca=ofertas”  class=”MNlatesquerda”>&nbsp;PROMOÇÕES</font></td>

</tr>

</td>

</tr>

<tr>

<td><img src=”config/templates/<%=varLang%>/<%=varSkin %>/regua1×1.gif” height=”1″></td>

</tr>

</table>

<%

‘Loop dos registros encontrados na tebela categorias

DO UNTIL  RS_Categorias.EOF

‘Atribui o calor do codigo_categoria a session(“codigo_categoria”)

session(“codigo_categ”) = RS_Categorias(“codigo_categoria”)

‘Query de consulta a tabela subcategorias

Query_subcategorias = “SELECT codigo_chave, codigo_subcategoria, codigo_categoria, nome_subcategoria, descricao_subcategoria, sigla_idioma FROM Subcategorias WHERE codigo_categoria = ” & session(“codigo_categ”) & ” AND sigla_idioma = ‘”&varLang&”‘ ORDER BY nome_subcategoria”

Agora, mais abaixo, na função “exibe_produtos()” adicione o trecho em vermelho. Isso fará com que carregue os produtos em promoções sempre que abrir esse link produtos.asp?tipo_busca=ofertas :

ElseIf request(“tipo_busca”) = “ofertas” Then

Query_produtos = “SELECT Produtos.codigo_produto,  Produtos.codigo_categoria, Produtos.codigo_subcategoria, Produtos.codigo_marca, Produtos.codigo_produto_loja, Produtos.nome_produto, Produtos.descricao_produto, Produtos.autor, Produtos.codigo_isbn, Produtos.tamanhos, Produtos.cores, Produtos.preco_base, Produtos.preco_unitario, Produtos.desconto, Produtos.moeda, Produtos.quantidade_produto, Produtos.img_produtoPQN, Produtos.img_produtoGRD, Produtos.img_produto_adic01PQN, Produtos.img_produto_adic01GRD, Produtos.img_produto_adic02PQN, Produtos.img_produto_adic02GRD, Produtos.img_produto_adic03PQN, Produtos.img_produto_adic03GRD, Produtos.peso, Produtos.destaque_vitrine, Produtos.promocao, Produtos.data_inicio, Produtos.data_fim, Produtos.disponivel,  Produtos.sigla_idioma ,  Produtos.sem_preco FROM Categorias INNER JOIN Produtos ON Categorias.codigo_categoria = Produtos.codigo_categoria  WHERE Produtos.sigla_idioma = ‘”&varLang&”‘ AND Categorias.sigla_idioma = ‘”&varLang&”‘ AND Produtos.disponivel = 1 AND Produtos.promocao = 1 ” & queryORDERBY

‘ Habilita a possibilidade de ordem dos produtos

exibeOrdemProd = True

Pronto! Agora poderá colocar o link “produtos.asp?tipo_busca=ofertas” em algum banner ou como link.

Abraço e até a próxima.

Related posts:

1. Como fazer categorias que não tem produtos desaparecer da loja – Loja Exemplo
2. Visualização do estoque ao pesquisar produtos na Loja Exemplo.
3. Relatório de produtos vendidos – Loja Exemplo

Atualmente alguns lojistas não vem obtendo sucesso ao atualizar o frete personalizado da Loja Exemplo. Em alguns casos dá o erro abaixo:

Microsoft Cursor Engine error ‘80040e38′

Row cannot be located for updating. Some values may have been changed since it was last read.

/loja/painelctrl/ADM_altera_valores_frete.asp, line 52

Para resolver o problema, entre no arquivo “painelctrl/ADM_altera_valores_frete.asp” e adicione os trechos em vermelho:

RS_Produto.Open “SELECT codigo_frete, UF, Localidade, indicador, km, p0, p1, p2, p3, p4, p5, p6, p7, p8, p9, p10, p11, p12, p13, p14, p15, p16, p17, p18, p19, p20, p21, p22, p23, p24, p25, p26, p27, p28, p29, p30, advalorem from Tabela_frete_personalizado WHERE codigo_frete =”&I&”", Conexao

If request(“valorPadrao”) <> “” And Request(“ativaValorPadrao”) = “sim” Then

‘Caso o usuário defina um valor de frete único para todas as regiões

valor_basePadrao = replace(request(“valorPadrao”),”.”,”")

valor_basePadrao = replace(valor_basePadrao,”,”,”.”)

Conexao.execute “UPDATE Tabela_frete_personalizado SET P”&o&”=’”&Trim( valor_basePadrao)&”‘ WHERE codigo_frete =’”&I&”‘ “

‘RS_Produto(“P”&o) = valor_basePadrao RETIRE ESSA LINHA OU COMENTE ELA

Else

‘Caso o usuário defina um valor de frete diferente para cada região.

valor_base       = replace(valor_fr(I),”.”,”")

valor_base       = replace(valor_base,”,”,”.”)

Conexao.execute “UPDATE Tabela_frete_personalizado SET P”&o&”=’”&valor_base&”‘ WHERE codigo_frete =’”&I&”‘ “

‘RS_Produto(“P”&o) = Trim(valor_base)  RETIRE ESSA LINHA OU COMENTE ELA

End if

‘RS_Produto.Update RETIRE ESSA LINHA OU COMENTE ELA

Isso deverá resolver.

Até a próxima!

Abraço

Related posts:

1. Resolução problema de calculo de frete (E-sedex) do sistema Loja Exemplo
2. Retirar calculo de frete do PagSeguro mantendo o calculado pela loja (sistema Loja Exemplo)
3. Solução “problema com alteração dos produtos na lojaExemplo”

Essa modificação é para mostrar o prazo de entrega do PAC, Sedex e E-sedex consultando direto nos Correios. Estou me baseando no arquivo cep_frete.asp disponibilizado pelo Phil.

O restante das formas de entrega, caso estejam habilitadas, você pode digitar no administrativo que irá aparecer  na hora do cliente calcular, assim como é mostrado o Sedex e Pac na imagem acima.

Abra o arquivo “cep_frete.asp” de sua loja (lembrando que precisa estar com as atualizações do Phil) e adicione os trechos em vermelho:

msgErro = oNode.selectSingleNode(“MsgErro”).Text

nodeValorAR = oNode.selectSingleNode(“ValorAvisoRecebimento”).Text

prazo = oNode.selectSingleNode(“PrazoEntrega”).Text

‘O valor do aviso de recebimento já está incluso.. O valor da caixa é adicionado(2.0)

Valor = CDbl(nodeValor) + 1.1

if cod = “40010″ then

if (nodeValor = 0) then

valorSedex = “vazio”

if msgErro <> “” then

session(“statustemp_Sedex”) = msgErro

else

session(“statustemp_Sedex”) = “erro”

end if

else

valorSedex = CDBl(Valor) + CDBl(ADDSedex)

end if

session(“prazo_sedex”) = prazo

elseif cod = “41106″ then

if (nodeValor = 0) then

valorPac = “vazio”

if msgErro <> “” then

session(“statustemp_Pac”) = msgErro

else

session(“statustemp_Pac”) = “erro”

end if

else

valorPac = CDBl(Valor) + CDBl(ADDPAC)

end if

session(“prazo_pac”) = prazo

elseif cod = “81019″ then

if (nodeValor = 0) then

valorESedex = “vazio”

if msgErro <> “” then

session(“statustemp_ESedex”) = msgErro

else

session(“statustemp_ESedex”) = “erro”

end if

else

valorESedex = CDBl(Valor) + CDBl(ADDESedex)

end if

session(“prazo_Esedex”) = prazo

end if

next

Else

valorSedex = “0″

valorPac = “0″

valorESedex = “0″

session(“statustemp_Sedex”) = “erro”

session(“statustemp_Pac”) = “erro”

session(“statustemp_ESedex”) = “erro”

End If

set objXmlHttp = nothing

set objXmlDom = Nothing

Mais abaixo adicione os trechos em vermelho:

Function Frete_Correios(FctCEP,FctPeso)

(..)

‘Monta string de valores para post

informacoes = informacoes & OpcaoFrete(“SEDEX”,Frete_sedex, Frete_sedex_erro,session(“prazo_sedex”))

End Function

‘############### ESEDEX ###############

Function Frete_CorreiosEsedex(FctCEP,FctPeso)

(..)

‘Monta string de valores para post

informacoes = informacoes & OpcaoFrete(“E-SEDEX”,Frete_Esedex, Frete_Esedex_erro,session(“prazo_Esedex”))

End Function

‘############### PAC ###############

Function Frete_CorreiosPAC(FctCEP,FctPeso)

(..)

informacoes = informacoes & OpcaoFrete(“PAC”,Frete_PAC, Frete_PAC_erro,session(“prazo_pac”))

End Function

‘############### DIRECT EXPRESS ####################

Function Frete_DirecExpress(FctCEP,FctPeso)

(..)

informacoes = informacoes & OpcaoFrete(“DIRECT EXPRESS”, Frete_DirecExpressVlr,Frete_DirecExpress_erro, pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”PrazoEntregaDirectExpress”))

Set HttpObjSend = Nothing

Else

Response.write “Error: (” & HttpObjSend.Status & “) ” & HttpObjSend.statusText

End If

End Function

‘############### FEDEX INTERNACIONAL ###############

Function Frete_FEDEX(FctPAIS,FctZIP,FctPESO)

(..)

informacoes = informacoes & OpcaoFrete(“FEDEX”,Frete_fedex,Frete_fedex_erro, pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”PrazoEntregaFedex”))

End Function

‘############### FRETE RETIRAR NA LOJA ###############

Function Frete_RetirarLoja()

VarFrete_retirarloja = “0″

VarFrete_retirarloja_erro = “ok”

informacoes = informacoes & OpcaoFrete(“RETIRAR NA LOJA”,FormatNumber(VarFrete_retirarloja), VarFrete_retirarloja_erro,pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”PrazoEntregaRetirarNaLoja”))

End Function

‘############### FRETE TRANSPORTADORA A COBRAR ###############

Function Frete_Transportadora()

VarFrete_transportadora = “0″

VarFrete_transportadora_erro = “ok”

informacoes = informacoes & OpcaoFrete(“TRANSPORTADORA A COBRAR”,FormatNumber(VarFrete_transportadora),VarFrete_transportadora_erro, pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”PrazoEntregaTransportadora”))

End Function

‘############### FRETE PERSONALIZADO ###############

Function Frete_Personalizado(Cidade,UF,FctPeso)

(..)

informacoes = informacoes & OpcaoFrete(UCase(pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”NomeFretePersonalizado”)), Frete_Person,Frete_Person_erro,pegaValorAtrib(Application(“XMLArquivoConfiguracao”), “dados/configuracao_dados”,”PrazoEntregaFretePersonalizado”))

End Function

‘############### FIM – OPÇÕES DE FRETE ###############

‘Funcao para montar as opções de frete

Function OpcaoFrete(tipo,valor,erro,prazo)

OpcaoFrete = tipo & “:” & valor & “:” & erro & “:” & prazo& “#”

End Function

Agora, no arquivo “funcoes/funcoes_js.js” adicione o trecho e vermelho:

// Insere o option na tabela

var x=document.getElementById(CEP).insertRow(1)

var y=x.insertCell(0)

x.height=”10″

x.bgColor=color

y.innerHTML=”<input type=’radio’ name=’opcao’ value=’”+ array_frete[0] + “#” + vlrFRETE_VIS + “#” + vlrFRETE_REAL + “#” + CEP + “‘ onclick=’send_frete(this.value);’>” + array_frete[0] + ” ( ” + vlrFRETE_VIS + ” )   Prazo de entrega de <font color=’FF0000′><strong>” +array_frete[3]+” dias </strong></font>”

count+=1;

}

Pronto, até a proxima.

Abraço.

Related posts:

1. Como mostrar quantidade de itens no carrinho da Loja Exemplo
2. Resolução problema de calculo de frete (E-sedex) do sistema Loja Exemplo
3. Retirar calculo de frete do PagSeguro mantendo o calculado pela loja (sistema Loja Exemplo)

Vou mostrar uma melhoria simples que pode ajudar bastante na identificação do produto a ser atualizado o estoque.

Abra o arquivo painelctrl/ADM_lista_produto.asp e adicione o trecho em vermelho :

<td align=”center” width=”100″>CATEGORIA</td>

<td align=”center” width=”100″>ESTOQUE</td>

</tr>

<%

If request(“pesquisar”) <> “” Then

Set RS_Produto = Server.CreateObject(“ADODB.Recordset”)

RS_Produto.CursorLocation = 3

RS_Produto.CursorType = 0

RS_Produto.LockType = 3

query =  ”SELECT Produtos.codigo_produto, Produtos.nome_produto, Produtos.quantidade_produto, Categorias.codigo_categoria, Categorias.nome_categoria FROM Produtos INNER JOIN Categorias ON Produtos.codigo_categoria = Categorias.codigo_categoria WHERE Produtos.sigla_idioma = ‘” & varLang & “‘ AND Categorias.sigla_idioma = ‘” & varLang & “‘”

If request(“codigo_categoria”) <> “” Then

Mais abaixo, no mesmo arquivo, adicione os trechos em vermelho:

<td align=”center”><%=RS_Produto(“nome_categoria”)%></td>

<td align=”center”><%=RS_Produto(“quantidade_produto”)%></td>

</tr>

<%

norep = RS_Produto(“codigo_produto”)

End if

RS_Produto.MoveNext

Wend

End If

RS_Produto.Close

Set RS_Produto = nothing

Else

%>

<tr class=”Linha1Tabela”>

<td colspan=”4” align=”center”><b>O resultado da busca será exibido aqui.</b></td>

</tr>

Espero ter ajudado.

Abraço.

Related posts:

1. Como criar uma pagina só com produtos em promoção – Loja Exemplo
2. Escolha o número de produtos a entrar no carrinho antes de clicar no botão “comprar” (Loja Exemplo)
3. Como fazer categorias que não tem produtos desaparecer da loja – Loja Exemplo

Essa modificação permitirá que o cliente escolha a quantidade de itens de um produto ainda na página “produtos_descricao.asp”.

Veja o exemplo:

Abra o arquivo “produtos_descricão.asp” e logo no começo do arquivo adicione o trecho em vermelho:

<form method=”post” name=”produto” action=”carrinho.asp”>

<input type=”hidden” name=”lang” value=”<%=request(“lang”)%>”>

<input type=”hidden” name=”codigo_produto” value=”">

<input type=”hidden” name=”codigo_categoria” value=”">

<input type=”hidden” name=”qtd_produtos” value=”1″>

<input type=”hidden” name=”codigo_cor” value=”">

<input type=”hidden” name=”codigo_tamanho” value=”">

<input type=”hidden” name=”ato” value=”FIM”>

<input type=”hidden” name=”mode” value=”comprar”>

</form>

<script type=”text/javascript”>

function altera_quantidade() {

document.produto.qtd_produtos.value =  document.getElementById(“qtd”).value;  ;

}

function addproduto2(codprod,codcat) {

document.produto.codigo_produto.value = codprod;

document.produto.codigo_categoria.value = codcat;

var nome_tamanho = document.getElementsByName(“nome_tamanho”);

Mais abaixo, no mesmo arquivo, adicione o trecho em vermelho:

<tr>

<td width=”100%” align=”center” height=”50″><input name=”Submit” type=”button” class=”BTTNindique” value=”Avalie este Produto” onclick=”window.open(‘form_coment.asp?IDPROD=<%=IDPROD%>&NOMEPROD=<%=NOMEPROD%>’,'Comente’,'resizable=no; width=600, height=600;’)”>&nbsp;&nbsp;<input name=”Submit” type=”button” class=”BTTNindique” value=”<%=Application(“BttIndicar”)%>” onclick=”window.open(‘indique.asp?lang=<%= varLang %>&tipo=produto&codigo_produto=<%= RS_Produto(“codigo_produto”) %>’,'Indique’,'resizable=no; width=600, height=250;’)”>&nbsp;&nbsp;

<%If Application(“tipoconfiguracao”)=”lojavirtual” Then%>

<br>

Quantidade:

<input type=”text” value=”1″ name=”qtd” id=”qtd” onKeyUp=’this.value = this.value.replace(/[^\d]*/gi,”"); altera_quantidade();’ size=”4″ maxlength=”3″ class=”LCNlatesquerda”>

<input name=”Submit” type=”button” class=”BTTNcomprar” value=”<%=Application(“BttComprar”)%>” onclick=”javascript: addproduto2(‘<%=RS_Produto(“codigo_produto”)%>’, ‘<%=RS_Produto(“codigo_categoria”)%>’)”><%End if%></td>

</tr>

<%End if%>

Agora abra o arquivo “carrinho.asp” e adicione o trecho em vermelho:

VarNome_produto = RS_Produto(“nome_produto”)

if Request(“qtd_produtos”) <> “” Then

VarQuantidade_produto = request.form(“qtd_produtos”)

Else

VarQuantidade_produto = “1″

End if

VarDesconto =  RS_Produto(“desconto”)

O ultimo arquivo que precisa ser alterado é o “funcoes/funcoes.asp”, adicione o trecho em vermelho:

If Not existe_produto Is Nothing Then

‘Atribui valor de quantidade para o produto se postado

If request(“quantidade_produto”) <> “” Then

qtd = request(“quantidade_produto”)

‘Se não postado o valor será de 1 (uma unidade)

Else

if Fctquantidade_produto <> “1″ Then

qtd = Fctquantidade_produto

Else

qtd = 1

End if

End If

‘Chama funcão para alterar a quantidade produtos, caso a chamado ao carrinho seja inclusão de um mesmo produto.

Call Altera_dados_pedidos(existe_produto,qtd)

‘Insere um novo produto

Else

‘Grava valores de atributos no arquivo XML

set produto=docxml.createelement(“produto”)

produto.SetAttribute “codigo_produto”,FctCodigo_produto

É isso ai!

Abraço.

Related posts:

1. Como colocar botão “comprar” na homepage e listagens de categoria na Lojaexemplo Locaweb
2. Visualização do estoque ao pesquisar produtos na Loja Exemplo.
3. Como mostrar quantidade de itens no carrinho da Loja Exemplo

Para quem quer implementar um resumo de carrinho mais completo, e que apareça para o cliente o número de itens no carrinho, conseguirá segundo esse post. Atualmente temos na loja a função para pegar o valor total do carrinho. Juntando essas duas funções pode-se implementar um resumo de compra mais detalhado nas demais paginas enquanto o cliente estiver escolhendo mais itens.

Veja um exemplo de loja onde as informações do carrinho fica no cabeçalho (circulado em vermelho):

http://www.looksmodafeminina.com/

Para começar, adicione o código do txt abaixo no final de seu arquivo “/funcoes/funcoes.asp:”

Arquivo txt com a função pegaQtd

O código que mostrará os itens no carrinho é (esta no txt clicando no link abaixo):

Trecho de código txt mostra quantidade de itens

Com os códigos acima será possivel mostrar a quantidade de itens no carrinho onde desejar na loja. Caso queira mostrar junto com isso o valor total (como na loja que mostrei acima), precisa colocar o seguinte código (esse código não esta formatado, vai precisar formata-lo para seu layout):

Trecho de código txt

Bom é isso!

Abraço.

Related posts:

1. Escolha o número de produtos a entrar no carrinho antes de clicar no botão “comprar” (Loja Exemplo)
2. Como mostrar ultimos posts de seu blog em sua Loja Exemplo
3. Como mostrar prazo de entrega para o cliente Loja Exemplo.

Recentemente o Phil compartilhou um script no forum para que as lojas efetuem os cálculos de frete direto nos Correios. O script funciona muito bem, mas alguns lojistas estavam com problemas apenas com o E-sedex. Examinei o código de cálculo mais a fundo e descobri que toda tentativa de consulta vinha como retorno o valor R$ 0,00.

Efetuei algumas pesquisas e descobri que para fazer cálculo do E-sedex direto nos Correios o lojista precisa ter um contrato, pois diferente do PAC e SEDEX essa forma de frete não tem padrão e é exclusiva a alguns lojistas que tem contrato com os Correios. Na LojaExemplo só funcionava porque parece que a Locaweb tinha contrato com os Correios (me corrijam se eu estiver errado) e no código fonte existia um login e senha, por isso antes funcionava.

Bom vamos lá!

Se você envia produtos por E-sedex de certo terá contrato com os Correios. Os dados que irá precisar serão o login e senha que usa para entrar no endereço: http://www.corporativo.correios.com.br/encomendas/servicosonline/default.cfm?e=1004

Estou usando o arquivo disponibilizado pelo Phil como base.

Na linha 80 do arquivo “cep_frete.asp” troque o trecho:

entrada = entrada & ”      <nCdEmpresa>”&CodEmpresaCorreio&”</nCdEmpresa> “

entrada = entrada & ”      <sDsSenha>”&SenhaEmpresaCorreio&”</sDsSenha> “

Por esse:

entrada = entrada & ”      <nCdEmpresa>SEU LOGIN</nCdEmpresa> ”
entrada = entrada & ”      <sDsSenha>SUA SENHA</sDsSenha> “

SEU LOGIN = seguencia de numeros que usa para entrar no endereço dos correios que passei acima
SUA SENHA = a senha utilizada para entrar no endereço dos correios que passei cima

Com essa simples alteração terá o cálculo do E-sedex direto nos correios.

Corrigindo um problema citado pela Regina nos comentarios abaixo segue a resolução:

Para resolver troque seguinte linha do arquivo cep_frete.asp:

If Application(“DisponivelESedex”) = “sim” Then

Por:

If Application(“DisponivelESedex”) = “sim” and session(“valortemp_ESedex”) <> “vazio” Then

Esse código esta aproximadamente na linha 243.

Com essa modificação quando o cliente tiver um cep não coberto pelo E-sedex o mesmo não vai aparecer, assim mostrando o restante e evitando de travar.

Abraço e espero ter ajudado.

Related posts:

1. Retirar calculo de frete do PagSeguro mantendo o calculado pela loja (sistema Loja Exemplo)
2. Como resolver problema ao atualizar o frete personalizado da Loja Exemplo.
3. Baixem várias melhorias da Loja Exemplo Locaweb.