<% '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Loja Exemplo Locaweb ' Versão: 6.4 ' Data: 12/09/06 ' Arquivo: ADM_altera_config_dados_gerais.asp ' Versão do arquivo: 0.0 ' Data da ultima atualização: 04/04/08 ' '----------------------------------------------------------------------------- ' Licença Código Livre: http://comercio.Locaweb.com.br/gpl/gpl.txt '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Esta página só pode ser acessada se o visitante já se autenticou checa_senha() 'Verifica se o perfil de usuário permite acesso a esta página Call checa_perfil_admin(""&ADMGeral&"") status = Request("status") varPagina = "ADM_altera_config_dados_gerais" %>

<% If status = "dgerais" Then %> • Configurações gerais da loja <% ElseIf status="danaliserisco" Then %> • Configurações de análise e risco <% End If %> <% If request("acao") <> "" Then Call abre_ArquivoXML(Application("XMLArquivoConfiguracao"),FctobjXML,FctobjRoot) Set configuracao = FctobjRoot.selectSingleNode("dados/configuracao_dados") FOR EACH count in request.form If request.form.key(count) <> "acao" And Instr(request.form.key(count),"_b") = "0" Then configuracao.setAttribute request.form.key(count),(Trim(request.form.item(count))) End If NEXT Set configuracao = Nothing Set objRoot = Nothing FctobjXML.save(Application("XMLArquivoConfiguracao")) msg_resultado = "Dados alterados com sucesso." End if 'Formata os campos necessários Call PreparaDado(pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","CNPJ"),"CNPJ",cnpj_b1,cnpj_b2,cnpj_b3,cnpj_b4,cnpj_b5) If status="dgerais" Then %> ');"> <%If msg_resultado <> "" Then%> <%End if%> "> <%If pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","TipoBanco") = "mssql" Then%> <%End If%> <%=msg_resultado%> DADOS CADASTRAIS Principal Idioma: <% IdiomaDefault = pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","IdiomaDefault") IdiomasConfigurados = pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","IdiomasConfigurados") IdiomasConfigurados = Split(IdiomasConfigurados,",") %> <% 'Loop para listar os idiomas configurados For z=0 to Ubound(IdiomasConfigurados) %> ><%=IdiomasConfigurados(z)%> <% Next %> Define qual será o principal idioma da Loja Tipo de Configuração: <%Call MontaCombo_opcaoConfiguracao("TipoConfiguracao",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","TipoConfiguracao"))%> Loja virtual para venda de produtos ou Catalogo virtual apenas para exposição de produtos. Nome da loja: " class="FORMbox" size="40"> Nome da loja que será exibido como titulo do navegador e apresentação da loja. Razão Social: " class="FORMbox" size="40"> Razão social da empresa responsável pela loja virtual. CNPJ:  .  .  /  - "> CNPJ da empresa responsável pela loja virtual. E-mail: " class="FORMbox" size="40"> E-mail de contato da loja. DDD/Telefone: " class="FORMbox" size="4" onKeyUp='this.value=this.value.replace(/[^\d]*/gi,""); return autoTab(this, 2, event);' maxlength="2"> - " class="FORMbox" size="20" maxlength="15"> Telefone de contato da loja. DDD/Fax: " class="FORMbox" size="4" onKeyUp='this.value=this.value.replace(/[^\d]*/gi,""); return autoTab(this, 2, event);' maxlength="2"> - " class="FORMbox" size="20" maxlength="15"> Fax da loja. Endereço: " class="FORMbox" size="40"> Endereço de correspondência Loja. Bairro: " class="FORMbox" size="40"> Bairro da loja. CEP: " class="FORMbox" size="10"> CEP da loja, ele será usado como CEP de origem para cálculo do frete. Cidade: " class="FORMbox" size="40"> A cidade onde a loja está situada. Estado: " class="FORMbox" size="5"> O estado onde a loja está situada. País: " class="FORMbox" size="40"> O país onde a loja está situada. DADOS GERAIS Controle de estoque: <%Call Cria_Combo_opcao("Estoque",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","Estoque"),"")%> Ativa o controle de estoque dos produtos cadastrados. Esta condição ativa diminuirá no banco de dados os produtos a quantidade de produto quando o mesmo for inserido no carrinho. Cálculo de frete: <%Call Cria_Combo_opcao("CalculoFrete",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","CalculoFrete"),"")%> Ativa ou desativa o cálculo de frete na loja. Ordem das categorias: <% Call MontaCombo_CATorderby("OrdemCategoria",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","OrdemCategoria"),"") %> Ordem das categorias a serem exibidas. Quantidade minima de produto: " class="FORMbox" size="10"> A Quantidade minima servirá para alertar ao administrador quando um produt atingir este número. Este recurso depende do controle de estoque ativado. Num. de produtos por página: " class="FORMbox" size="10"> Número de produtos a serem exibidos por página quando selecionados por: categorias, subcategorias e pesquisa. Num. de produtos na vitrine: <% For I=1 to 12 If i = Int(pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","ProdutosVitrine")) Then %> <%= i %> <% Else %> <%= i %> <% End If Next %> Número de produtos a serem exibidos na página inicial da loja (vitrine). A exibição desses produtos será feita de forma randômica. Ordem dos produtos: <% Call MontaCombo_orderby("OrdemProduto",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","OrdemProduto"),"completa") %> Ordem dos produtos a serem exibidos por página. Num. Pedido inicial: " class="FORMbox" size="10"> Número de pedido inicial. Manter cookies de pedidos não finalizados por: " class="FORMbox" size="10"> dias Prazo de validade do cookie, este recurso possbilita o usuário recuperar um pedido não finalizado. Formato dos e-mails: <%Call MontaCombo_opcaoFormato("FormatoMailLoja",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","FormatoMailLoja"))%> Formato dos e-mails enviados pela Loja (confirmação de compra, indicação de produtos, etc.). SMTP: " class="FORMbox" size="40"> Endereço SMTP utilizado para envio de e-mails pela loja. Endereço seguro (HTTPS): " class="FORMbox" size="40"> Endereço seguro da loja. O endereço SSL deverá ser informado sem o nome do usuário, exemplo: https://sslxx.websiteseguro.com, veja que no painel de controle você verá algo do tipo https://sslxx.websiteseguro.com/usuario. Ativar debug de pedidos: <%Call Cria_Combo_opcao("DebugPedido",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","DebugPedido"),"")%> Esta condição fará que o arquivo XML de cada pedido seja mantido para analise de um programador em busca de alguma irregularidade. Número de e-mails por bloco da Newsletter: " class="FORMbox" size="5"> Número de e-mails enviados por bloco no sistema da Newsletter. Intervalo de tempo por bloco da Newsletter: " class="FORMbox" size="5"> (segundos) Intervalo de tempo entre o envio dos blocos da Newsletter. Endereço MS-SQL: " class="FORMbox" size="40"> Endereço do servidor de seu banco de dados, solicite a LocaWeb. Base MS-SQL: " class="FORMbox" size="40"> Nome da Base de Dados fornecida pela LocaWeb para seu banco de dados. Geralmente o mesmo nome do Usuário. Usuário MS-SQL: " class="FORMbox" size="40"> Usuário fornecido pela LocaWeb para seu banco de dados. Senha MS-SQL: " class="FORMbox" size="40"> Sua senha do banco de dados definida no Painel de Controle da LocaWeb. DADOS E-BIT Ativar pesquisa e-bit? <%Call Cria_Combo_opcao("EbitAtivo",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","EbitAtivo"),"")%> Ativa o banner para pesquisa e-bit no final das compras aprovadas. Necessário possuir serviço ativo no e-bit, mais informações acesse http://www.ebitempresa.com.br Código e-bit: " class="FORMbox" size="40"> Código da loja junto ao e-bit. <% Elseif status="danaliserisco" Then %> <%If msg_resultado <> "" Then%> <%End if%> <%=msg_resultado%> CLEARSALE Identificação ClearSale: " class="FORMbox" size="40"> Número de identificação da loja junto à solução LocaWeb. Ambiente? <%Call MontaCombo_opcaoAmb("AmbienteClearSale",pegaValorAtrib(Application("XMLArquivoConfiguracao"),"dados/configuracao_dados","AmbienteClearSale"))%> Define o ambiente da solução ClearSale, entre "TESTE" ou "PRODUÇÃO". <% End If %>