View Single Post
  #3  
Old October 1st 07, 05:24 PM posted to microsoft.public.outlook.program_vba
Peter Marchert
external usenet poster
 
Posts: 116
Default Problem with MapiTable and OL2000

Hmm, have I forgot something? Do I need a RDOSession for MapiTables?

Peter

On 1 Okt., 18:04, "Ken Slovak - [MVP - Outlook]"
wrote:
How are you assigning the RDOSession object, are you using
NameSpace.MAPIOBJECT? That doesn't exist in Outlook 2000, there you have to
use RDOSession.Logon.

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

"Peter Marchert" wrote in message

ps.com...



Hello,


I try to use the MapiTable object in OL 2000, but get an error on the
ExecSQL statement: "HrGetPropTag: MAPIProp == NULL". Same code on
2002/2003 works without error, so I don`t know where to search. Does
MapiTables not work on 2000?


I tried it with an exchange post box and with a pst file - same
result.


Here is the code:


Public Sub GetDaslProperty()


Const DASLGUID As String = "{41B067EB-BDC6-472C-8989-
BAC7B8F788EE}"
Const DASLPROPERTY As String = "http://schemas.microsoft.com/mapi/
string/" & DASLGUID & "/" & "Test"


Dim objTable As Object
Dim objRecordset As Object


Dim strSQL As String


Set objTable = CreateObject("Redemption.MAPITable")


objTable.Item =
Outlook.Session.GetDefaultFolder(olFolderCalendar) .Items


strSQL = "SELECT """ & DASLPROPERTY & """ FROM Folder"


Set objRecordset = objTable.ExecSQL(strSQL)


End Sub


Redemption version is 4.5.0.730


Thanks for answers!


Peter- Zitierten Text ausblenden -


- Zitierten Text anzeigen -



Ads