<% '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Loja Exemplo Locaweb ' Versão: 6.4 ' Data: 12/09/06 ' Arquivo: ADM_config_pagamento.asp ' Versão do arquivo: 0.0 ' Data da ultima atualização: 07/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(""&ADMMeioPagto&"") %> <%=Application("NomeLoja")%>
<% nome_pagto = request("nome_pagto") Call abre_xmlpagamentos(VarobjXML,VarobjRoot) Call altera_xmlpagamentos(request("nome_pagto"),VarobjRoot,configuracao) Set configuracao = VarobjRoot.selectSingleNode("configuracao/pagto[@nome_pagto='"&nome_pagto&"']") %> • Configuração <%=configuracao.getAttribute("nome_visualizacao")%>

"> <%If request("acao") = "alterar" Then%> <%End If%> <%If nome_pagto = "Visa" Or nome_pagto = "VisaElectron" Or nome_pagto = "Diners" Or nome_pagto = "Mastercard" Or nome_pagto = "Amex" Or nome_pagto = "Itau" Or nome_pagto = "Unibanco" Or nome_pagto = "Boleto" Then%> <%End If%> <%If nome_pagto = "Visa" Or nome_pagto = "VisaElectron" Or nome_pagto = "Diners" Or nome_pagto = "Mastercard" Or nome_pagto = "Amex" Or nome_pagto = "Itau" Or nome_pagto = "Unibanco" Or nome_pagto = "Boleto" Or nome_pagto = "Bradesco" Then%> <%End If%> <% Call Mostra_formularioPagto(request("nome_pagto"))%>
Dados alterados com sucesso.
Disponível no site? <%Call Cria_Combo_opcao("disponivel",configuracao.getAttribute("disponivel"),"")%>
Identificação LocaWeb? " class="FORMbox" onKeyUp='this.value=this.value.replace(/[^\d]*/gi,"");' maxlength="15">
Ambiente <%Call MontaCombo_opcaoAmb("ambiente",configuracao.getAttribute("ambiente"))%>
<% Call fecha_xmlpagamentos(VarobjXML,VarobjRoot) %> <%If nome_pagto = "Visa" Or nome_pagto = "Diners" Or nome_pagto = "Mastercard" Or nome_pagto = "Amex" Then%> <%End If%>