tenho este codigo que é para buscar as informaçoes do db e enviar altomaticamente um e-mail para o e-mail que esta cadastrado, mnas ele não dá nenhum erro e nem envia o email dão uma olhada tem urgencia <% Set conexao = Server.CreateObject("ADODB.Connection") cnpath="DBQ=" & server.mappath("anderson.mdb") conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath listar = "SELECT nome, email, login, senha FROM usuarios WHERE login = '"& request.form("login") &"'" Set lista = conexao.Execute(listar) nome = lista("nome") email = lista("email") login = lista("login") senha = lista("senha") Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = "127.0.0.1" 'voce tinha escrito sem aspas Mail.From = "anderson@anderson.com.br" ' Troque pelo email do remetente Mail.FromName = "Anderson" ' Troque pelo nome do remetente ' Troque pelo email e nome do destinatário Mail.AddAddress "&email&", "Destinatário" Mail.Subject = "Cadastro no Folow-Up da Anderson" ' Assunto do e-mail Mail.Body = "Nome:" &nome& "<br> Login:" &login& "<br> Senha:" &senha& "<br>" On Error Resume Next Mail.Send If Err.number <> 0 Then Response.Write "Error encountered: " & Err.Description End If On Error Goto 0 %>