A Microsoft Outlook email forum. Outlook Banter

If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below.

Go Back   Home » Outlook Banter forum » Microsoft Outlook Email Newsgroups » Outlook and VBA
Site Map Home Register Authors List Search Today's Posts Mark Forums Read Web Partners

Redemption MAPITable Question



 
 
Thread Tools Search this Thread Display Modes
  #1  
Old November 19th 07, 08:49 PM posted to microsoft.public.office.developer.outlook.vba,microsoft.public.office.developer.vba,microsoft.public.outlook.program_vba
Patrick Pirtle
external usenet poster
 
Posts: 14
Default Redemption MAPITable Question

Dmitry -
As always, many thanks for your help. The problem turned
out to be that, although I had installed the latest DLL into
"C:\program files\redemption", the version that was *really*
getting used was in "C:\Windows\System32". Although I
tried unregistering the one in the System32 folder, followed
by registering the one in "Program Files", I couldn't get it to
work. Ultimately, I just copied the new one over into the
System32 folder and re-registered it.

The code below worked just fine in OutlookSpy. Now,
it's back to working on my little app. Thanks, again, to
both yourself and Ken Slovak.
- Patrick
____________________________________________
The impossible just takes a little longer...


Dmitry Streblechenko wrote:
Did you remove Redemption from your project references and re-add it
again to make sure VB can see the latest version?
Can you try to run the following script from OutlookSpy (click "Script
Editor", paste the script, click Run)?

set Table = CreateObject("Redemption.MAPITable")
Table.Item =Application.ActiveExplorer.CurrentFolder.Items
Set Recordset = Table.ExecSQL("SELECT Subject, ReceivedTime, EntryID
from Folder " & _
"order by ReceivedTime
desc") while not Recordset.EOF
Debug.Print(Recordset.Fields("ReceivedTime").Value & " - " &
Recordset.Fields("Subject").Value)
Recordset.MoveNext
wend


Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Patrick Pirtle" pap at mka dot com wrote in message
...
Hmmm...Well, I'm using V4.4.0.714, and have purchased
the redistributable version. Just to be sure, I uninstalled it,
downloaded the developer version from Dmitry's site, and
reinstalled it.

The MAPITable doesn't seem to have the ExecSQL
method. Any idea where I'm going wrong? Thanks.

____________________________________________
The impossible just takes a little longer...Hmmm...


Ken Slovak - [MVP - Outlook] wrote:
Your code works here.

Are you using a version of Redemption that supports ExecSQL? Check
your version and check the Object Browser to see if your version of
Redemption supports that method.

[snip]


--


  #2  
Old November 20th 07, 04:45 AM posted to microsoft.public.office.developer.outlook.vba,microsoft.public.office.developer.vba,microsoft.public.outlook.program_vba
Dmitry Streblechenko
external usenet poster
 
Posts: 2,116
Default Redemption MAPITable Question

Since System32 is in the PATH,
regsvr32.exe redemption.dll
will register the dll in System32. Specify fully qualified path when
registering with regsvr32.exe:
regsvr32.exe "c:\program files\redemption\redemption.dll"

Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Patrick Pirtle" pap at mka dot com wrote in message
...
Dmitry -
As always, many thanks for your help. The problem turned
out to be that, although I had installed the latest DLL into
"C:\program files\redemption", the version that was *really*
getting used was in "C:\Windows\System32". Although I
tried unregistering the one in the System32 folder, followed
by registering the one in "Program Files", I couldn't get it to
work. Ultimately, I just copied the new one over into the
System32 folder and re-registered it.

The code below worked just fine in OutlookSpy. Now,
it's back to working on my little app. Thanks, again, to
both yourself and Ken Slovak.
- Patrick
____________________________________________
The impossible just takes a little longer...


Dmitry Streblechenko wrote:
Did you remove Redemption from your project references and re-add it
again to make sure VB can see the latest version?
Can you try to run the following script from OutlookSpy (click "Script
Editor", paste the script, click Run)?

set Table = CreateObject("Redemption.MAPITable")
Table.Item =Application.ActiveExplorer.CurrentFolder.Items
Set Recordset = Table.ExecSQL("SELECT Subject, ReceivedTime, EntryID
from Folder " & _
"order by ReceivedTime
desc") while not Recordset.EOF
Debug.Print(Recordset.Fields("ReceivedTime").Value & " - " &
Recordset.Fields("Subject").Value)
Recordset.MoveNext
wend


Dmitry Streblechenko (MVP)
http://www.dimastr.com/
OutlookSpy - Outlook, CDO
and MAPI Developer Tool

"Patrick Pirtle" pap at mka dot com wrote in message
...
Hmmm...Well, I'm using V4.4.0.714, and have purchased
the redistributable version. Just to be sure, I uninstalled it,
downloaded the developer version from Dmitry's site, and
reinstalled it.

The MAPITable doesn't seem to have the ExecSQL
method. Any idea where I'm going wrong? Thanks.

____________________________________________
The impossible just takes a little longer...Hmmm...


Ken Slovak - [MVP - Outlook] wrote:
Your code works here.

Are you using a version of Redemption that supports ExecSQL? Check
your version and check the Object Browser to see if your version of
Redemption supports that method.
[snip]


--




 




Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Forum Jump

Similar Threads
Thread Thread Starter Forum Replies Last Post
Redemption - general question WhytheQ Outlook and VBA 3 October 31st 07 01:05 PM
Redemption Question - showaddressbook and saveas [email protected] Outlook and VBA 5 July 7th 07 10:30 PM
Redemption MAPITable - how to deal with empty fields SummerSky Outlook and VBA 2 December 20th 06 04:27 PM
Redemption - MapiTable : BusyStatus Tadwick Outlook and VBA 4 August 10th 06 06:36 PM
Redemption MAPITable Dmitry Streblechenko Add-ins for Outlook 1 January 12th 06 04:09 AM


All times are GMT +1. The time now is 05:12 AM.


Powered by vBulletin® Version 3.6.4
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.Search Engine Friendly URLs by vBSEO 2.4.0
Copyright ©2004-2025 Outlook Banter.
The comments are property of their posters.