在ASP中使用CDO發送郵件

來源:互聯網
上載者:User

在ASP中使用CDO發送郵件

   在ASP(Active Server Pages)中發送郵件不是件困難的事情,需要的條件就是使用CDO組件(Collaborative Data Object),它是誰NT Option Pack 4安裝後就有的。為了確認CDO組件已經正確安裝在你的機器上,選擇“開始/控制台/添加、刪除程式/NT Option Pack 4”,看看是否SMTP服務已經安裝。如果沒有安裝,那麼運行下面顯示的代碼時將會發生錯誤(錯誤資訊類似於“Invaild class string”)。

在ASP中建立CDO組件執行個體的代碼如下:

〈 %

Dim objCDO

Set objCDO = Server.CreateObject("CDONTS.NewMail")

% 〉

  現在可以發送郵件了!CDONTS.NewMail執行個體有一些明顯而且簡單的屬性與方法,下面來看看相關的代碼:

〈 %

’This code assumes the above CDO

’instantiation code is included

objCDO.To = "mitchell@4guysfromrolla.com"

objCDO.From = "gates@microsoft.com"

objCDO.cc = "barksdale@netscape.com,jobs@apple.com"

Dim txtSubject

txtSubject = "Hello Scott! We were wanting your advice on some programming issues. Please come to Redmond at your earliest convenience for a very fat check!"

objCDO.Subject = "Attn: Scott, we need you!!"

objCDO.Body = txtSubject

objCDO.Send

% 〉

  這就是所有的一切。組件的幾個屬性簡單實用。執行上面的代碼後,一封郵件將從from gates@microsoft.com發往mitchelL@4guysfromrolla.com,並且抄送到barksdale@netscape.comjobs@apple.com。主題就是一個簡單的常規資訊。最後使用send方法將郵件發送出去(不要忘記執行這個方法,否則郵件不會發送出去)。

在ASP中使用CDO發送郵件

  CDO組件的功能相當強大!你可以使用它發送附件,發信給郵件清單,發送時間表(就象在Outlook中一樣)。

  點擊這篇文章,可以看到如何通過私人Email進行行銷買賣。這篇文章詳細描述了更好使用CDO組件的問題。

下面來看看CDO組件的另外一些特徵,代碼片斷如下:

〈 %

objCDO.To = "someone@xyz.com (John Doe)"

objCDO.From = "me@abc.com (Jane Doe)"

objCDO.bcc = "janedoe@aol.com" ’Blind cc

objCDO.Subject = "My Resume, per Request"

objCDO.Body = "Hello John. Here is a copy of my resume"

objCDO.Importance = 2 ’High importance!

objCDO.AttachFile("\\server\jane\resume.doc","Resume.doc")

objCDO.Send ’Send off the email!

’Cleanup

Set objCDO = Nothing

% >

在ASP中使用CDO發送郵件

  所你所見,這裡介紹了2個新的屬性和一個新的方法。Bcc屬性工作表示密送,這意味著在“To”處列表的人收到郵件後,看不到郵件發送到了“Bcc”處的人。同樣使用了Importance屬性,它有3個選項:

0 - Low

1 - Normal

2 - High

  如果不特別設定,Importance屬性的預設值是1-Normal。在地址處,寫成了如下樣式

emailaddress@something.com (Name)” ,其中括弧中的表示發送郵件人的名字。這樣,收到郵件的人John Doe將會看到郵件來自Jane Doe,而不是me@abc.com

  這裡使用的新的方法是AttachFile。正如方法的名字所示,它表示在要發送的郵件上附加一個檔案。它接受3個參數,但這裡只需要討論前2個。第1個參數表示附件的檔案,在這個例子中是\\server\jane\resume.doc;第2個參數是可選則的,表示附件在郵件中的命名,這裡是“Resume.doc”,但你可以選擇更好聽些的名字(比如叫做:“Jane’s Nifty Resume”)。

如果遇到拒絕訪問的錯誤 ...

  根據Web伺服器上的安全設定不同,在執行send方法時,有可能遇到拒絕方法的錯誤。發生這個錯誤時,請檢查一下Windows Nt的使用者Iusr_MachineName是否對郵件根目錄(一般位於C:\InetPub\mailroot\)擁有“完全控制”的許可權。(比如說:Web伺服器的名字是Bob,那麼請檢查使用者Iusr_Bob是否擁有那個許可權)。


 



相關文章

E-Commerce Solutions

Leverage the same tools powering the Alibaba Ecosystem

Learn more >

Apsara Conference 2019

The Rise of Data Intelligence, September 25th - 27th, Hangzhou, China

Learn more >

Alibaba Cloud Free Trial

Learn and experience the power of Alibaba Cloud with a free trial worth $300-1200 USD

Learn more >

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。