|
http://www.uzzf.com/news/1134.html 每日一囧 這篇文章跟大家主要介紹到的是關(guān)于如何使用ASPEMAIL，希望對(duì)大家有所幫助。 使用ASPEMAIL之前您必須先在您的ASP腳本中創(chuàng)建一個(gè)對(duì)象，例如： <% Set Mail = Server.CreateObject("Persits.MailSender") %> 在發(fā)送郵件之前，您首先需要確定一個(gè)SMTP服務(wù)器的地址以及相應(yīng)的端口號(hào)（可以使用默認(rèn)值）如： Mail.Host = "smtp.mycompany.com" Mail.Port = 25 ' 該項(xiàng)可選.端口25是默認(rèn)值 下一步需要指定郵件發(fā)送者的郵件地址，如： Mail.From = "sales@mycompany.com" Mail.FromName = "銷售部" ' 該項(xiàng)可選 然后指定郵件的接收者或者是CC接收者BCC接收者以及郵件的回復(fù)地址等，可以分別使用AddAddress、 AddCC、 AddBcc 以及 AddReplyTo 方法。這些方法接收兩個(gè)變量，郵件地址和可選的姓名。 注意：在使用這些方法的時(shí)候，不要使用=符號(hào)，直接將變量用空格與方法隔開即可，如： Mail.AddAddress "jsmith@company1.com", "張輝" Mail.AddCC "bjohnson@company2.com" ' 名字是可選的 使用Subject 和 Body 屬性分別來指定郵件的標(biāo)題和郵件的內(nèi)容。BODY可以使用文本方式或者HTML方式，如果要使用HTML方式則必須將IsHTML 屬性設(shè)置為True。請(qǐng)看以下例子： 純文本方式 Mail.Subject = "關(guān)于報(bào)價(jià)" Mail.Body = "尊敬的張經(jīng)理:" & chr(13) & chr(10) & "感謝您的來信，以下是您需要的報(bào)價(jià)" 或者HTML方式 Mail.Subject = "關(guān)于報(bào)價(jià)" Mail.Body = "<HTML><BODY BGCOLOR=#0000FF>尊敬的張經(jīng)理:....</BODY></HTML>" Mail.IsHTML = True 如果是需要發(fā)送文件作為郵件的附件，則需要用AddAttachment方法。它支持使用完全的物理路徑的方式，如： Mail.AddAttachment "c:\dir\receipt.doc" 同時(shí)需要注意的是該方法也不需要用“=”來做連接。 現(xiàn)在可以將郵件內(nèi)容發(fā)送出去了，發(fā)送郵件使用Send方法，如果要忽略可能發(fā)生的錯(cuò)誤，可以使用On Error Resume Next語句來跳過，并且顯示出錯(cuò)誤的信息，如： On Error Resume Next Mail.Send If Err <> 0 Then Response.Write "發(fā)現(xiàn)一個(gè)錯(cuò)誤，錯(cuò)誤信息描述為: " & Err.Description End If 值得注意的是，目前很多SMTP服務(wù)器需要驗(yàn)證郵件發(fā)送者是否是合法的服務(wù)器用戶，即平時(shí)我們所說的“密碼驗(yàn)證功能”，這時(shí)候就需要特別指定郵件發(fā)送者的用戶名和密碼，方法如下： mail.username = "用戶名" mail.password = "密碼" 在使用的時(shí)候?qū)⑸厦鎯删湓捈尤隡AIL.SEND語句前面，并用您接收郵件的用戶名和密碼來替換上面的“用戶名”和“密碼”這樣即可通過帶有密碼驗(yàn)證的SMTP服務(wù)器來發(fā)送您的郵件了；以下是一段實(shí)際運(yùn)行中的例子，您可以參考使用： '發(fā)送郵件 strHost = "SMTP.SINA.COM.CN" `指定SMTP服務(wù)器 Set Mail = Server.CreateObject("Persits.MailSender") Mail.Host = strHost Mail.From = "TEST@BESTDNS.NET" Mail.FromName = "海威公司" Mail.AddAddress MAILADDRESS@CEDB.COM ‘ 郵件地址 Mail.AddCC "service@" ' message subject Mail.Subject = "用戶郵件通知" ‘郵件的標(biāo)題 mail.username = "USERNAME"‘服務(wù)器上有效的用戶名 mail.password = "PASSWORD"‘服務(wù)器上有效的密碼 Mail.Charset = "gb2312"‘郵件的內(nèi)碼，使用這個(gè)選項(xiàng)可以避免中文亂碼 Mail.IsHTML = True‘指定郵件的格式為HTML方式 Mail.Body = "<HTML><head><meta http-equiv='Content-Type' content='text/html; charset=gb2312'></head><BODY><br> 尊敬的客戶您好！<br><br>感謝您對(duì)海威的支持！ <br><br>=====================================================<br>北京海威計(jì)算機(jī)技術(shù)公司--為您提供完善的internet服務(wù)<br>http://www.Cedb.com http://www.Bestdns.net<br>電 話：68421606 68469317/18 傳真：68421359<br>地址：北京中關(guān)村南大街甲33號(hào)科貿(mào)中心407 郵編：100081<br>=====================================================" Mail.Send |
|
|
