タイトル : VB.netからOutlook2003でメール送信 投稿日 : 2005/02/14(Mon) 18:55 投稿者 : すー
[OSのVer]:WindowsXP Pro [VBのVer]:VB.NET [その他]:Outlook2003 はじめまして。すーといいます。 現在、上記の環境にて抽出した顧客に対するメール送信を行うプログラムを開発中です。 まず、一度試してみようとMSDNライブラリにあったようにやってみたのですが、ビルドエラーになり 実行できません。 Sorce >------------------------* *参照設定に「Microsoft Outlook 11.0 Object Library」を追加しています。 'TO DO: If you use the Microsoft Outlook 11.0 Object Library, uncomment the following line. Imports Outlook = Microsoft.Office.Interop.Outlook Module Module1 Sub Main() ' Create an Outlook application. Dim oApp As Outlook._Application = New Outlook.Application ' Create the name space. Dim oNS As Outlook._NameSpace = oApp.GetNamespace("mapi") ' Create a new MailItem. Dim oMsg As Outlook._MailItem oMsg = oApp.CreateItem(Outlook.OlItemType.olMailItem) <---- Err Try oMsg.Subject = "Test Subject" oMsg.Body = "Test Body" oMsg.To = "Test@***.co.jp" oMsg.Send() Catch ex As Exception Console.WriteLine(ex.Message) End Try ' Clean up. oMsg = Nothing oNS = Nothing oApp = Nothing End Sub End Module Sorce >------------------------* 上記の「Err」の部分で、以下のビルドエラーが出ます。 「Option Strict On で 'System.Object' から 'Microsoft.Office.Interop.Outlook._MailItem' への暗黙的な変換はできません。」 参照設定が「Microsoft Outlook 10.0 Object Library」ではないからかと思ったのですが、 「Microsoft Outlook 11.0 Object Library」しか選択できません。 いろいろ検索してみたりしたのですが、検索してもあまりヒットせず途方にくれています。 とても簡単なところでつまづいているのかもしれませんが、 お力を貸していただけたらと思います。 |