2008-09-19 16 views
0

私はMS AccessアプリケーションのテーブルとしてリンクされたExchangeメールボックスを持っています。これは主に読み込みに使用されますが、別のフォルダにメッセージを移動することもできます。MS Accessで1つのリンクされたExchangeメールボックスから別のリンクされたExchangeメールボックスにメールを移動する方法

残念ながら、これは2番目のリンクされたメールボックスに書くほど簡単ではありません。明らかに一部のフィールドを編集できないためです。次のエラーが表示されるため、To:フィールドのような重要なフィールドは使用できません。

"To 'は式に基づいており、編集できません"。 Accessから呼び出されたときに、私の知る限り、これはセキュリティダイアログを与えるので、代わりにのCreateObject(「Outlook.Application」)を使用

は、ここではオプションではありません。

すべてのソリューション?*

答えて

1

この2つの問題はありますか? Mailは、Moveメソッドを使用して移動できます。ここでは抜粋です。

Set oApp = CreateObject("Outlook.Application") 

Set oNS = oApp.GetNamespace("MAPI") 

Set oMailItems = oNS.GetDefaultFolder(olFolderInbox) 
Set itm = oMailItems.Items(6) 
itm.Move oNS.GetDefaultFolder(olFolderDeletedItems) 

ただし、受信者(TO)は読み取り専用です、でも、私は、Outlook Redemtionと、信じています。

0

私はアクセスが仕事のための適切なツールだとは思わない。 Outlook.ApplicationオブジェクトまたはCDOのようなMAPIラッパーを使用することはありません。 CDOはよりエレガントでパフォーマンスの高い方法ですが、Officeセットアップを介してクライアントに明示的にインストールする必要があります。

スクリプトのセキュリティダイアログ(および一般的なCDOの機能不全の一部)を避けたい場合は、Outlook Redemptionを試してください。

Redemptionは、CDOのドロップイン置換であり、前にCDO/Outlook VBAのコーディングを行ったときにすぐに使い慣れたものになります。

関連する問題