> Greetings --
>
> I'm trying to automate the process of detecting certain incoming emails and
> writing them out as plain text files under Outlook 2003. Am running into a
> couple of problems.
>
> I have a rule pointing to a VBA subroutine, and the rule appears to trigger
> when I use Run Rules Now. However, the VBA IDE does not behave as I am used
> to in Access, Excel and Project. If I set a breakpoint, the code does not
> break. Stop statements don't work either. Sometime a MsgBox statement will
> pop a message box, sometimes not. Debug.Print statements sometime put
> something in the Immediate window, something not. Not being able to set
> breakpoints, view the content of variables, watch the loops loop, etc. is
> making this very hard.
>
> The underlying task is to read through the messages in the inbox and write
> the body of ones that contain a certain keyword out as plain text files.
> Between what I've found on the net and my own knowledge of object models,
> here's what I've got at this point.
>
> Public Sub ReadMessageBody(oItem As Outlook.MailItem)
>
> Dim strId As String
> Dim oNameSpace As Outlook.NameSpace
> Dim oInboxItem As Outlook.MailItem
> Dim oMailItem As Outlook.MailItem
> Dim oFolder As Outlook.MAPIFolder
> Dim oMsg As Object
> Dim strBody As String
>
> '* point to the name space
> Set oNameSpace = Application.GetNamespace("MAPI")
>
> '* set a reference to the inbox folder
> Set oFolder = Application.GetNamespace("MAPI").GetDefaultFolder(olFolderInbox)
>
> '* loop through the inbox
> For Each oInboxItem In oFolder.Items
> strId = oInboxItem.EntryID
>
> Set oMailItem = oNameSpace.GetItemFromID(strId)
> If Left(oMailItem.Subject, 6) = "Deploy" Then
> '* save message body as text
> Else
> '* something else, ignore
> End If
> Next oInboxItem
>
> End Sub
>
> As best I can determine with no debugging capability is that the sub is
> called, but does not enter the For...Next loop. Also, it appears to fire
> once per file in the Inbox.
>
> Can anyone give me any suggestions on how the use the IDE in Outlook? This
> would be a lot easier to get working if I could used the debugger in the
> usual fashion.
>
> Thanks a million...