Outlook behaving oddly

[1DMF]

Hi,

Can someone advise why the following code would produce the opposite effect?

        Set oItems = oApp.GetNamespace("MAPI").GetDefaultFolder(olSentItems).Items

        ' Get last item
        Set oMsg = oItems.GetLast

When oMsg is interrogated it is getting the first email ever sent not the last email sent from the user's sent items.

Why would exchange / outlook be doing this for only one particular user, all other users the code works as expected?

Thanks,

1DMF.

"In complete darkness we are all the same, it is only our knowledge and wisdom that separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"
Free Electronic Dance Music

 

[1DMF]

I refactored the code..

Set oItems = oApp.GetNamespace("MAPI").GetDefaultFolder(olSentItems).Items.Restrict("[SentOn] > '" & Format(DateAdd("n", -(iMinutes), Now()), "ddddd h:nn AMPM") & "'")

I have an attribute iMinutes, that can be set and it gets all emails from sent items within the last iMinutes (default = 30).

It has resolved the problem?


"In complete darkness we are all the same, it is only our knowledge and wisdom that separates us, don't let your eyes deceive you."

"If a shortcut was meant to be easy, it wouldn't be a shortcut, it would be the way!"
Free Electronic Dance Music