• Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 559
  • Last Modified:

Read Through Email Subject Line?

I have this script that I received from an Expert here at EE.  It worked as I asked, but user needs some additional information.  In the snippet below, "Missing Transactions" is a folder that contains emails.  Would it be possible for me to diplay the Subject Line of the emails within that folder? (Missing Transactions)

Also, does anyone know of a good reference book for scripting in general?

Thanks
SnowLapa
Const olFolderInbox = 6
 
Set objOutlook = CreateObject("Outlook.Application")
Set objNamespace = objOutlook.GetNamespace("MAPI")
Set objFolder = objNamespace.GetDefaultFolder(olFolderInbox):Set objFolder= objFolder.Parent
Set flds = objFolder.folders
Set mpfSubFolder = flds.GetFirst
 
 
Do While Not mpfSubFolder Is Nothing
	If mpfSubFolder.Name = "IS Department" Then
		Set colItems = mpfSubFolder.folders
		For Each objItem in colItems
    		if objItem.name = "Missing Transactions" then
    			'DO WHATEVER
    		End If
		Next
    End If
    Set mpfSubFolder = flds.GetNext
Loop

Open in new window

0
SnowLapa
Asked:
SnowLapa
1 Solution
 
lodar123Commented:
hey.. me again :)
try to modify that part of the script with this....
 

Set colItems = mpfSubFolder.folders
For Each objItem in colItems
	if objItem.name = "Missing Transactions" then
    		Set colItems2 = objItem.items
		For Each objItem2 in colItems2
    			if objItem2.Subject = "SUBJECT" then
    				'DO WHATEVER
			End If
		Next
	'DO WHATEVER
	end If
Next

Open in new window

0
 
SnowLapaAuthor Commented:
Worked great.

Thanks
SnowLapa
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

Join & Write a Comment

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Tackle projects and never again get stuck behind a technical roadblock.
Join Now