View Single Post
  #2  
Old October 1st 07, 05:04 PM posted to microsoft.public.outlook.program_vba
Ken Slovak - [MVP - Outlook]
external usenet poster
 
Posts: 5,848
Default Problem with MapiTable and OL2000

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 Options
http://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


Ads