View Single Post
  #2  
Old July 7th 08, 02:31 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default DeliverToStore does not work on 2003?

This is a POP3 account, the "test" account? Have you tried casting your
account object to a RDOPOP3Account object?

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm


"Peter Marchert" wrote in message
...
Hello,

I tried to set the DeliverToStore property in Outlook 2003 SP3 by the
following code:

Sub StoreTest()

Dim objRDOSession As Redemption.RDOSession
Dim objRDOAccount As Redemption.RDOAccount
Dim objRDOStore As Redemption.RDOStore

Set objRDOSession = CreateObject("Redemption.RDOSession")
objRDOSession.MAPIOBJECT = Outlook.Session.MAPIOBJECT
Set objRDOAccount = objRDOSession.Accounts("test")

Set objRDOStore = objRDOSession.Stores.AddPSTStore("c:\test", 1,
"Store for test")
objRDOAccount.DeliverToStore = objRDOStore
objRDOAccount.Save

Set objRDOStore = Nothing
Set objRDOAccount = Nothing
Set objRDOSession = Nothing

End Sub

In the line "objRDOAccount.DeliverToStore = objRDOStore" the error
"Error in IOlkAccount.SetProp: E_ACCT_NOT_FOUND" occurs. The account
object is referenced and the name property for example can be
retrieved.

I tried this on english and german systems with the Redemption version
4.5.0.812.

With 2007 it works fine. On the homepage of Dmitry I read that
"DeliverToFolder" is a specific 2007 method (because this function was
not implemented in earlier versions). Is this also true for the
"DeliverToStore" method which is present in Outlook 2003 and earlier?

Thanks
Peter

--
Infos, Workshops & Software for
OutlookŪ: www.outlook-stuff.com

Ads