Hi Dmitri,

Thanks for you reply!

I am not sure what do you mean by:
4. What happens if instead of calling RDOSession.Logon you set
RDOSession.MAPIOBJECT ot Session.RDOSession from CDO?

here is what I run to get to the information:


'...logging on exchange...


'redemption
Dim session As New Redemption.RDOSession
session = CreateObject("Redemption.RDOSession")
session.LogonExchangeMailbox(MailBoxName, Server)

Dim FolderItemsRED As Redemption.RDOFolder
FolderItemsRED = session.GetDefaultFolder(6)

dim redcount as integer
redcount = FolderItemsRED.Items.Count
'this gives me 11


'mapi
Dim outlook_Profile As String = MailBoxName
Dim oSession As New MAPI.Session
oApp = New Outlook.Application
oNS = oApp.GetNamespace("mapi")

oNS.Logon(outlook_Profile, , False, True)

Dim Folder As Outlook.MAPIFolder = oNS.GetDefaultFolder(6)
Dim FolderItemsW As Outlook.Items = Folder.Items

dim mapicount as integer
mapicount = FolderItemsW.count
'this gives me 4039

Please let me know what is the other way to log on.

Thanks again!


--
mirzoni
------------------------------------------------------------------------
mirzoni's Profile: http://www.officehelp.in/member.php?userid=5392
View this thread: http://www.officehelp.in/showthread.php?t=1277781

Posted from - http://www.officehelp.in