Pessoal, Fiz uma pagina para testar o uso do cdonts. Aparentemente Ela excuta direitinho, só que o destinatário não recebe as mensagens. Estou usando na minha máquina windows 2000 professional com iis instalado, numa rede local com acesso a internet. Na pasta c:\inetpub\mailroot\drop não tem nenhuma mensagem. Já na pasta c:\inetpub\mailroot\Badpmail tem 3 arquivos com as extensões .bad ; .bdp e .bdr. Na pasta c:\inetpub\mailroot\queue tem um arquivo chamado: NTFS_b964f5e601c3a3e200000006.EML Por favor me ajudem ! Segue abaixo o código !!! <html> <head> <title>SMSsend.asp</title></head> <body bgcolor="#ffffff" link="#FFFFFF" vlink="#FFFFFF" alink="#FFFFFF"> <table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%" align="center" vspace="0" hspace="0"> <tr valign="top" align="center"> <td> <table width="500" border="0" cellspacing="0" cellpadding="0"> <tr> <td width="600" height="100%" valign="top"> s </td> </tr> <tr> <td width="600" height="100%" valign="top"> <p><font color="#022941"><br> <% Set objmail = Server.CreateObject("CDONTS.NewMail") objmail.from = de_email objmail.to = para_email objmail.subject = assunto objmail.body = texto objmail.send Set Mailer = Server.CreateObject("CDONTS.NewMail") Mailer.From = "fabianots@tj.rj.gov.br" Mailer.To= Request.Form("emailpara") Mailer.Subject = Request.Form("assunto") Mailer.Body = Request.Form("mensagem") Mailer.Importance = 1 Mailer.BodyFormat = 0 Mailer.MailFormat = 0 Mailer.Send 'Mailer.RemoteHost = "smtp.ig.com.br" 'Mailer.Priority = 1 'Mailer.AddRecipient Request.Form("NomePara"), Request.Form("emailpara") 'if Mailer.SendMail then msgenv=1 'else 'msgenv=0 'errol=Chr(34)& Mailer.Response &Chr(34) 'end if if msgenv=1 then %> <br> <font face="Verdana, Arial, Helvetica, sans-serif" size="3"> A sua mensagem foi enviada com sucesso para o n.º <%=session("Numero")%>.<br> Aproveite também para <a href="default.htm"><font size="3"><u>enviar</u></font></a> a outra pessoa.<br> </font><font color="#022941"> <% else %> </font></font></p> <form method="post" action="mailto:webmaster@netytal.pt?subject: Erro no envio de SMS" name="SMS2"> <font color="#022941"><font face="Verdana, Arial, Helvetica, sans-serif" size="3">Ocorreu um erro ao enviar a mensagem.<br> O erro foi:</font><font color="#022941"><%=errol%></font><font face="Verdana, Arial, Helvetica, sans-serif">.<br> Se este erro persistir reporte-o ao webmaster, usando o botão que se segue.<br> Desde já obrigado.<br> <br> <% response.write "NomePara: " & Request.Form("NomePara") response.write "emailPara: " & Request.Form("emailpara") %> <br> <input type="hidden" name="Erro" value="<%=errol%>"> <br> <input type="submit" name="Submit" value=" Notificar webmaster "> </font>.</font> <br> </form> <% end if ' Muito importante !!! convém ter isto no final, pois assim acaba com qualquer sessão !! e liberta o servidor... session.abandon %> </td> </tr> </table> </td> </tr> </table> <br> </body>
