分页: 1/1 第一页 1 最后页 [ 显示模式: 摘要 | 列表 ]

jmail的認證方式

[不指定 2008/04/21 15:28 | by Else ]
[codes=vb] set   mymail=server.CreateObject("jmail.message")    
          mymail.MailServerPassWord   ="pass"                 '发信授权邮件密码  
          mymail.MailServerUserName   ="who@qq.com"   '发信授权邮件名称  
          mymail.ContentType   =   "text/html"               '(是否支持html,如不要就去掉此行)  
          mymail.Charset="utf-8"                                 '使用字符集,不用改的  
          mymail.AddRecipient   "to@qq.com"         '收件人邮箱  
          mymail.Body=   "您好86,...."                               '邮件正文  
          mymail.From="from@test.com"             '发件人邮箱  
          mymail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
              
    
          mymail.Subject="你好吗?"                               '邮件标题  
          mymail.Send   "mail.qq.com",false               '邮件发送服务器
  set   mymail   =   nothing   [/codes]
Tags: , ,

asp常用的兩個email組件用法

[不指定 2008/04/07 16:51 | by Else ]
JMail.SMTPMail

<%
'文件測試中文亂碼問題
'測試時間:2007.12.03  -  第二次測試
'response.codepage="950"
Set JMail = Server.CreateObject("JMail.SMTPMail")
JMail.ContentType="text/html"
'JMail.Encoding = "base64" ' 有試過注釋此行,問題依舊
jmail.Charset="BIG5"
'jmail.ContentType   =   "text/html;charset=BIG5"
jmail.ISOEncodeHeaders   =   false  
JMail.Sender = "testi#sina.com" ' 發送人郵箱
JMail.SenderName = "這個中中文" ' 發送人姓名
JMail.AddRecipient("test#qq.com") ' 收件人郵箱
JMail.Body = "這個是內容,在測試一次,這個是註冊信息,不是垃圾 email,我們做個測試,測試的內容" ' 郵件正文
JMail.AddHeader "Originating-IP", Request.ServerVariables("REMOTE_ADDR")
arrFile = Split(fileItem1,"$$")
'For i = 0 To Ubound(arrFile)-1
'JMail.AddAttachment(arrFile(i)) ' 多附件添加,單一附件也試過,問題依舊
'Next
JMail.Subject = "你的註冊信息,請注意接收,接收的email 增加了encoding,刪除了codepage 去了 iso的標準" ' 郵件標題
JMail.Execute
JMail.Close
Set JMail = Nothing
%>

分页: 1/1 第一页 1 最后页 [ 显示模式: 摘要 | 列表 ]