jmail发邮件

使用JMail组件  
   
  Jmail具有以下特点：  
   
  （1）可以发送附件；  
  （2）详细日志能力，便于你查看问题所在；  
  （3）设置邮件发送的优先级；  
  （4）支持多种格式的邮件发送，比如说以HTML或者TXT的方式发送邮件。这是个免费的组件。  
  （5）密件发送/(CC)抄送/紧急信件发送能力；  
  （6）最关键的就是--免费的组件，不必发钱，所以非常值得使用。    
   
  网站：http://www.dimac.net/,目前版本是4.3  
   
     
   
  JMail组件的常用属性：  
   
  Body   　　邮件正文    
   
  Logging   　　调用Log记录，供Debug用    
   
  Priority   　　邮件的优先程度，从1到5    
   
  Sender   　　发件人    
   
  ServerAddress   　　SMTP服务器的IP地址或名称    
   
  Subject   　　邮件标题    
   
     
   
  JMail组件的常用方法：  
   
  AddAttachment   　　指定附件文件    
   
  AddRecipient   　　加入一个收件人    
   
  AddRecipientBCC   　　隐藏的副本抄送，只有发件人和BCC收件人知道。    
   
  AddRecipientCC   　　副本抄送    
   
  Execute   　　送出邮件    
   
     
   
  了解必要的属性及方法后，余下的部分接收使用者输入的Email，当成参数传给AddRecipient方法，然后根据需要填上其余属性，最后以Execute方法寄出。例如：  
   
                  Dim   JMail  
   
                  JMail   =   Server.CreateObject("JMail.SMTPMail")  
   
                  JMail.Logging   =   True  
   
                  JMail.ServerAddress   =   "202.96.144.48"  
   
                  JMail.Sender   =   "lihonggen0@163.com"  
   
                  JMail.Subject   =   "subject."  
   
                  JMail.Body   =   "body."  
   
                  JMail.AddRecipient("bbbb@163.com")  
   
                  JMail.AddAttachment("c:/go.gif")  
   
                  JMail.Priority   =   3  
   
                  JMail.Execute()  
   
                  JMail   =   Nothing