Ir ao conteúdo
  • Cadastre-se
Entre para seguir isso  
sergiosx

Script Esqueci minha senha

Recommended Posts

Estou com um recurso Esqueci minha senha complementando o sistema LOGIN E SENHA, mas ao enviar a informação por e-mail, não estou conseguindo formatar os dados.

O que pode estar acontecendo? Ao enviar, não está respeitando as tags de html e imprimindo todas as informações no corpo do e-mail.

Segue o script

<%

email = trim(request.form("email"))

usuario = trim(request.form("user"))

senha = trim(request.form("pass"))

Set conexao_bd = Server.CreateObject("ADODB.Connection")

conexao_bd.open "DBQ=" & Server.MapPath("users.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}"

Set tabela = conexao_bd.Execute( "Select user,pass from users where email = '"& email &"'")

if tabela.eof then

conexao_bd.close

set tabela = nothing

set conexao_bd = nothing

response.write "email invalido"

else

login = tabela("user")

senha = tabela("pass")

call envia_Senha(user,pass)

response.write "senha enviada"

end if

sub envia_Senha(user,pass)

'Envio de e-mail

dim msn

'monta texto do e-mail

msn = "<html>"

msn = msn & "<body>"

msn = msn & "<table border='1'>"

msn = msn & "<tr>"

msn = msn & "<td colspan='2'><b>Dados do Solicitante</b></td>"

msn = msn & "</tr>"

msn = msn & "<tr>"

msn = msn & "<td>Nome:</td>"

msn = msn & login

msn = msn & "</tr>"

msn = msn & "<tr>"

msn = msn & "<td>Senha:</td>"

msn = msn & senha

msn = msn & "</tr>"

msn = msn & "</table>"

msn = msn & "</body>"

msn = msn & "</html>"

set cdoMail = Server.CreateObject("CDONTS.NewMail")

cdoMail.from="sergiosx@uol.com.br"

cdoMail.To= email

cdoMail.Subject="lembrete senha"

'cdoMail.Body = "Usuário:" & login & "<br>" & "Senha:" & senha

cdoMail.Body = msn

cdoMail.Send

Set cdoMail = Nothing

end sub

%>

Compartilhar este post


Link para o post
Compartilhar em outros sites

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar agora
Entre para seguir isso  





Sobre o Clube do Hardware

No ar desde 1996, o Clube do Hardware é uma das maiores, mais antigas e mais respeitadas publicações sobre tecnologia do Brasil. Leia mais

Direitos autorais

Não permitimos a cópia ou reprodução do conteúdo do nosso site, fórum, newsletters e redes sociais, mesmo citando-se a fonte. Leia mais

×