想象一下如果你的Visual Basic具有處理電子郵件,作業,和其它Outlook 2000的功能,它將會變得多么強大。其實,并不需要很費事我們就可以做到這點。學習高級電子郵件功能,包括添加附件,創建草稿和制作文件夾。
電子郵件:基礎知識深入 當你自動運行Outlook時,最常見的操作就是發送電子郵件。因此,精通一些高級電子郵件技術是很值得的。下面簡單的代碼可以制作一個包含附件的郵件,然后發送它,不過它需要Microsoft Outlook 9.0 對象庫(Object Library)的支持。
Dim oOutlookApp As New Outlook.Application Dim oItemMail As Outlook.MailItem Set oItemMail = oOutlookApp.CreateItem(olMailItem) With oItemMail .Subject = "Message Generated By _Automating Outlook from Visual Basic" .Body = "Outlook is Great!" .Attachments.Add ("D:\OutlookObjectsSummary.doc") .Attachments.Add ("D:\CodeSamples.doc") .Importance = olImportanceHigh .Recipients.Add ("Angela.Jones@aol.com") .Recipients.Add ("KevinT@aol.com") .Sensitivity = olPersonal .Send
End With
|