<% '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Loja Exemplo Locaweb ' Versão: 6.4 ' Data: 12/09/06 ' Arquivo: conta_usuario.asp ' Versão do arquivo: 0.0 ' Data da ultima atualização: 19/06/07 ' '----------------------------------------------------------------------------- ' Licença Código Livre: http://comercio.Locaweb.com.br/gpl/gpl.txt '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#- rodape = "no" 'Checa se o usuário está autenticado If Session("logado") = "" Then Response.Redirect "autentica.asp?lang="&Request("lang")&"&tipo_acesso=conta" End if If Request.form("logoff") <> "" Then Session.Abandon Response.Redirect "default.asp" End If %>
<%If pegaValorAtrib(Application("XMLMeiosPagamentos"),"configuracao/pagto[@nome_pagto='Boleto']","disponivel") = "sim" Or pegaValorAtrib(Application("XMLMeiosPagamentos"),"configuracao/pagto[@nome_pagto='CobreBem']","disponivel") = "sim" Then%> <% Else %> <%End if%> <%If pegaValorAtrib(Application("XMLMeiosPagamentos"),"configuracao/pagto[@nome_pagto='Boleto']","disponivel") <> "sim" And pegaValorAtrib(Application("XMLMeiosPagamentos"),"configuracao/pagto[@nome_pagto='CobreBem']","disponivel") <> "sim" Then%> <%Else%> <%End if%>
<%=Application("CtusTxtTitContaUsuario")%>
  <%=Application("CtusTxtCadastro")%>
  <%=Application("CtusTxtUltimoPed")%>
  <%=Application("CtusTxtTrocaSenha")%>
  <%=Application("CtusTxtAcompPedido")%>
  <%=Application("CtusTxtVisPed")%>
  <%=Application("CtusTxtReBoleto")%>
  <%=Application("CtusTxtContato")%>
 
<%=Application("CtusTxtLogoff")%>
  <%=Application("CtusTxtContato")%>
 
<%=Application("CtusTxtLogoff")%>