home *** CD-ROM | disk | FTP | other *** search
/ Internet Pratica / IPRAT_01.iso / tutoriais / ASP / CDONTS / CDONTS.txt
Text File  |  2002-10-30  |  3KB  |  63 lines
  1. ASP - CDONTS a fundo 
  2.  
  3.  
  4. Oscar Pires Θ desenvolvedor ASP e Visual Basic, atualmente voltado para o e-commerce, e trabalha com sistemas para controle dos dados de lojas.
  5.  
  6. 08/10/2001 - Coluna n║ 05
  7.  
  8. ASP - CDONTS a fundo
  9.  
  10. Sites que mostram como enviar emails atravΘs de ASP Θ comum, porΘm, conheτo poucos que mostram todos os recursos possφveis, que a grande maioria de desenvolvedores desconhece e poderia sem d·vida, auxiliar bastante em certos casos.
  11.  
  12. Segue abaixo o c≤digo de envio de email atravΘs do CDONTS (componente incluso no IIS, porΘm nπo no PWS), com comentßrios e descriτπo.
  13.  
  14. <%
  15. Set mail = Server.CreateObject("CDONTS.NewMail")
  16. mail.to = "destinatario@provedor.com.br" 'destinatario, caso for mais de um, use ";"
  17. mail.from = "remetente@provedor.com.br" 'remetente, nπo permite multiplos
  18. mail.subject = "Nova mensagem em " & date 'titulo do email
  19. mail.CC = "destinatario@copia.com" 'destinatario para copia, permite m·ltiplos
  20. mail.BCC = "oculto@destinatario" 'destinatßrio tambΘm, porΘm fica oculto, nπo aparece no mail, permite m·ltiplos
  21. mail.Importance = N 'importΓncia do email:
  22. Onde N Θ
  23. 0 (zero) Baixa
  24. 1 (padrπo) Normal
  25. 2 Alta
  26. mail.BodyFormat = x
  27. mail.MailFormat = x
  28. 'use MailFormat e BodyFormat para indicar o tipo de email, onde:
  29. 1 (padrπo) indica texto simples
  30. 0 (zero) indica conte·do em HTML
  31.  
  32. mail.AttachFile "c:\inetpub\wwwroot\trabalho.doc","Meu trabalho.doc"
  33. 'o attach file serve pra incluir um arquivo em emails, requer caminho fφsico
  34. mail.AttachURL "c:\inetpub\wwwroot\imagem.gif","imagem.gif"
  35. 'o attachURL serve para incluir imagens e caso o mail seja HTML, poderß fazer uma chamada a elas (veja body), tambΘm requer caminho fφsico
  36. mail.SetLocateIDs valor
  37. 'Define formataτπo na mensagem para n·meros, moeda, data, etc
  38. mail.Value(funτπo) = "valor"
  39. 'o Value inclui cabeτalho na mensagem, predefinindo funτ⌡es, exemplo: mail.value("Reply-To") = "eu@eu.org" ao clicar em responder, o mail por padrπo serß enviado α eu@eu.org, e nπo o destinatßrio como padrπo
  40. mail.ContentBase = "http://www.URLPadrao.com.br"
  41. 'indica URL padrπo, todos links tipo href=teste.html retornarao http://www.URLPadrao.com.br/teste.html
  42. mail.body = "Corpo da mensagem, se vocΩ marcar BodyFormat e MailFormat para HTML, pode usar tags <b><h3>aqui</h3></b>!" 'corpo da mensagem
  43. mail.send 'uso ·nico, sem parametros
  44.  
  45. 'se numero de erros for maior que zero, entao ocorreu
  46. if err.number > 0 then response.write "Problemas ao enviar, porfavor tente novamente " & err.description else response.write "Email enviado com sucesso!"
  47. end if
  48. %>
  49.  
  50. Para saber o caminho fφsico no servidor, Θ simples, basta usar response.write Server.MapPath("/")
  51.  
  52. ╔ isso aφ, com certeza o envio de emails Θ um recurso de extrema importΓncia e ter conhecimento amplo dos recursos amplia as possibilidades. Recomendo sempre ter em mπos descriτπo de tais recursos, atΘ, ao menos, se familiarizar mais com eles :)
  53.  
  54. AtΘ a pr≤xima semana, onde irei escrever um pouco sobre File System Object.
  55.  
  56. Abraτo.
  57.  
  58. Oscar Pires
  59. blade@imasters.com.br
  60.  
  61. Todos os direitos autorais dos artigos pertencem ao seu autor. 
  62.  
  63.