<% '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-# ' Loja Exemplo Locaweb ' Versão: 6.4 ' Data: 12/09/06 ' Arquivo: conta_usuario_altera_senha.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 '-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#-#- page = "conta_usuario_cadastrado" 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("acao") = "alterar" Then Altera_Senha = TrocaSenhaUsuario(Conexao, Session("user_Id"), Request.form("senha_atual"), Request.form("nova_senha")) If Altera_Senha = "0" Then varMsgSenha = Application("CtussenTxtMSG1") ElseIf Altera_Senha = "1" Then varMsgSenha = Application("CtussenTxtMSG2") ElseIf Altera_Senha = "2" Then varMsgSenha = Application("CtussenTxtMSG3") End if %> <% End if %>

<%= varMsgSenha%>

<%=Application("CtussenTxtTitTrocasenha")%>

<%=Application("CtussenTxEmail")%>: <%= Session("user_Id")%>

<%=Application("CtussenTxtSenAtual")%>:

<%=Application("CtussenTxtNovaSen")%>:

<%=Application("CtussenTxtConfSen")%>:

" class="BTTN1" Onclick="return valida_trocapassword(document.senha);">