• 1
  • 2
  • 3
  • 4
  • 5
网站空间访问异常 首 页  »  帮助中心  »  虚拟主机  »  网站空间访问异常
虚拟主机Jmail系列问题与其相应解答
发布日期:2015-12-3 13:12:32

  1、JMAIL的版本是多少?

  G型虚拟主机是4.4版本;M2、M3型虚拟主机是6.0版本

  2、JMAIL是否需要单独的发信服务器?

  是的,JMAIL 需要设置单独的发信服务器

  如:set mail=server.CreateObject("jmail.SMTPMail")

  mail.ServerAddress = "mail.domain.com"

  3、为什么使用jmail发信时会发信失败?

  最可能的原因是您指定的发信服务器需要发信认证,而您在程序中没有指定发信用户名和密码,具体的编码为:

  set mail=CreateObject("jmail.Message")

  mail.Charset ="gb2312"

  mail.From ="from@hichina.com"

  mail.AddRecipient "to@hichina.com"

  mail.MailDomain="mail.hichina.com"

  mail.MailServerUserName = " from @hichina.com"

  mail.MailServerPassWord = "****"

  mail.subject=”test”

  mail.body= “欢迎”

  'On Error Resume Next

  mail.Send("mail.hichina.com")

  mail.close()

  set mail=nothing

  4、Jmail 是否能发送附件?

  可以

  mail.AddAttachment (replace(server.MapPath("/test.doc"),"",""))

  5、 Jmail 是否能发送Html格式的邮件?

  可以,具体的请您查看使用手册。

  6、Jmail发信的实例,模块化随时调用

  一个用jmail发信的过程及使用方法. 发信时,直接调用这个过程即可。

<% br="">  dim str,HtmlBody 
  HtmlBody="I Love 2Yup!" 


  str=JmailSend( "hello","ILoveYou",true,HtmlBody,"  "hello","smtp.sina.com.cn","hello","Password")    
  if str="Y" then 
   response.write("发送成功") 
  else 
   response.write("发送失败!请重试!") 
  end if 
  '================================================= 
  '函数名:JmailSend 
  '作 用:用Jmail发送邮件 
  '参 数:Subject 邮件标题 
  ' Body 邮件内容 
  ' Body 邮件内容 
  ' isHtml 是否发送Html格式邮件 (true 是) 
  ' HtmlBody Html格式邮件内容 
  '    MailTo 收件人Email 
  ' From 发件人Email 
  ' FromName 发件人姓名 
  ' Smtp smtp服务器 
  ' Username 邮箱用户名 
  ' Password 邮箱密码 
  '返回值:JmailSend="N" 发送失败 JmailSend="Y" 发送成功 
  '~~~~~~~~~~suercool~~~~~ 
   
  '================================================= 
   function JmailSend(Subject,Body,isHtml,HtmlBody,MailTo,From,FromName,Smtp,Username,Password) 
   dim JmailMsg 
   set JmailMsg=server.createobject("jmail.message") 
   JmailMsg.mailserverusername=Username 
   JmailMsg.mailserverpassword=Password 
   
   JmailMsg.addrecipient MailTo 
   JmailMsg.from=From 
   JmailMsg.fromname=FromName 
   
   JmailMsg.charset="gb2312" 
   JmailMsg.logging=true 
   JmailMsg.silent=true 
   
   JmailMsg.subject=Subject 
   JmailMsg.body=Body 
   if isHtml=true then JmailMsg.htmlbody=HtmlBody 
   
   if not JmailMsg.send(Smtp) then 
   JmailSend="N" 
   else 
   JmailSend="Y" 
   end if 
   JmailMsg.close 
   set JmailMsg=nothing 
  end function 
  %>


  7、Jmail组件实例。

  1)发信服务器不需要认证;

<% br="">set mail=server.CreateObject("jmail.SMTPMail") 
mail.Charset="gb2312" 
mail.ServerAddress = "mx.hichina.com"   '改成可以正常使用的邮件服务器的IP或域名
mail.Sender="test@hichina.com"     '发送人的邮件地址
mail.SenderName="test" 
mail.AddRecipient("test@sina.com")   '接收者的邮件地址
mail.Subject ="标题"     '标题
mail.body="正文"     '正文
mail.Priority="1" 
'On Error Resume Next 
mail.Execute() 
mail.Close 
Set mail=nothing 
response.write "发送成功" 
%>

  2)发信服务器需要认证(万网邮箱适用)。

<%
set mail=CreateObject("jmail.Message") 
mail.Charset ="gb2312" 
mail.From ="test@hichina.com"    '发送人的邮件地址
mail.AddRecipient "test@hichina.com"   '接收者的邮件地址
mail.MailDomain="mx.hichina.com"   '改成可以正常使用的邮件服务器的IP或域名
mail.MailServerUserName = "test@hichina.com"  '邮件服务器的邮箱地址
mail.MailServerPassWord = "*****"   '邮件服务器的邮箱密码
mail.subject="标题"     '标题
mail.body= "正文"     '正文
On Error Resume Next 
mail.Send("mx.hichina.com")    '改成可以正常使用的邮件服务器的IP或域名
mail.close() 
set mail=nothing 
response.write "发送成功" 
%>