国产高清在线免费观看-国产高清在线免费无码-国产高清在线男人的天堂-国产高清在线视频-国产高清在线视频精品视频-国产高清在线视频伊甸园

　　在ASP編程中，遇到郵件發送的程序很多了，今天我將其做一整理。

　　利用Jmail組件群發郵件，同時包含多個附件的發送的實現：

　　Set jmail=Server.CreateObject("jmail.message")

　　fare="3.gif,00.jpg,1.gif" //多個附件列表

　　jmail.Silent = true

　　jmail.Charset = "gb2312"

　　'JMail.ContentType = "text/html"

　　jmail.From = ****** '郵件發送者的郵件地址

　　jmail.MailServerUserName = ****** '登錄郵件服務器所需的用戶名

　　jmail.MailServerPassWord = "********" '登錄郵件服務器所需的密碼

　　jmail.FromName = "Haha" '發件人名稱

　　jmail.Subject = "主題"

　　jmail.AddRecipient "**接收郵件地址**"

　　JMail.AddRecipient("**接收郵件地址**") '//此句：若需要都多個郵件接收人，可將此句寫上N條！

　　jmail.Body = "內容"

　　'''''群發附件

　　fare=split(fare,",")

　　for i=0 to ubound(fare)

　　jmail.AddAttachment server.MapPath(fare(i)) '要發送的附件地址

　　next

　　jmail.Priority = 1 '郵件的緊急程序，1 為最快，5 為最慢， 3 為默認值

　　jmail.Send("mail.139.com") '執行郵件發送（通過郵件服務器地址）

　　jmail.Close

　　set jmail = nothing

　　這樣就實現了郵件的群發（包含多個附件）的功能！

該文章在 2011/3/2 23:35:41 編輯過