<% '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Loja Exemplo Locaweb ' Versão: 6.5 ' Data: 12/09/06 ' Arquivo: ADM_lista_formaspagamentos.asp ' Versão do arquivo: 0.0 ' Data da ultima atualização: 12/09/06 ' '----------------------------------------------------------------------------- ' 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&"") %>

• Relação das formas de pagamentos <% 'Chamada de Sub para conexão com o arquivo XML. Call abre_ArquivoXML(Application("XMLMeiosPagamentos"),VarobjXML,VarobjRoot) %> <% Set configuracao = VarobjRoot.selectSingleNode("configuracao") Set itens = configuracao.getElementsByTagName("pagto") n_itens = itens.length for i = 0 to (n_itens - 1) Set pagto = itens.item(i) %> ';"> <% Set pagto = Nothing Next Set itens = Nothing Set configuracao = Nothing %> FORMA DE PAGAMENTO LIBERADO NO SITE <%=pagto.getAttribute("nome_visualizacao")%> <%=pagto.getAttribute("disponivel")%> <% 'Chamada de Sub para fechamento da conexão com o arquivo XML. Call fecha_xmlpagamentos(VarobjXML,VarobjRoot) %>