P
Peter Marchert
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
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