Function   SendMail(Email,Subject,Content,Fromer,LoginId,password,MailAddress)   
  Set   jmail   =   Server.CreateObject("JMAIL.Message")       '建立发送邮件的对象   
  jmail.silent   =   true         '屏蔽例外错误,返回FALSE跟TRUE两值j   
  jmail.logging   =   true       '启用邮件日志   
  jmail.Charset   =   "GB2312"           '邮件的文字编码为国标   
  jmail.ContentType   =   "text/html"         '邮件的格式为HTML格式   
  jmail.AddRecipient   Email           '邮件收件人的地址   
  jmail.From   =   Fromer       '发件人的E-MAIL地址   
  jmail.MailServerUserName   =   LoginId           '登录邮件服务器所需的用户名   
  jmail.MailServerPassword   =   password           '登录邮件服务器所需的密码   
  jmail.Subject   =   Subject         '邮件的标题     
  jmail.Body   =   Content             '邮件的内容   
  jmail.Priority   =   3             '邮件的紧急程序,1   为最快,5   为最慢,   3   为默认值   
  jmail.Send(MailAddress)           '执行邮件发送(通过邮件服务器地址)   
  if   err.number<>0   then   
  response.write("<script   language='javascript'>alert('\         邮件发送失败!');</script>")   
  end   if   
  jmail.Close()       '关闭对象   
  End   function   
    
  本人用的jmail组件   邮件服务器用的是163.com的,在发邮件过程中发现在:给@yahoo.com.cn,@hotmai.com,@163.com,@sina.com.cn,发送邮件,对方能收到。  但是
当用的是smtp.sina.com.cn的邮件服务器时,给 @yahoo.com.cn,@hotmai.com,@163.com,@sina.com.cn发送邮件 对方都收不到
请高手赐教、、、、、谢谢