?
Solved

Read Through Email Subject Line?

Posted on 2008-10-03
2
Medium Priority
?
549 Views
Last Modified: 2012-05-07
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
Comment
Question by:SnowLapa
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
2 Comments
 
LVL 5

Accepted Solution

by:
lodar123 earned 500 total points
ID: 22638293
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
 

Author Closing Comment

by:SnowLapa
ID: 31623588
Worked great.

Thanks
SnowLapa
0

Featured Post

What does it mean to be "Always On"?

Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

This is an addendum to the following article: Acitve Directory based Outlook Signature (http://www.experts-exchange.com/Programming/Languages/Visual_Basic/VB_Script/Q_24950055.html) The script is fine, and works in normal client-server domains…
When you see single cell contains number and text, and you have to get any date out of it seems like cracking our heads.
NetCrunch network monitor is a highly extensive platform for network monitoring and alert generation. In this video you'll see a live demo of NetCrunch with most notable features explained in a walk-through manner. You'll also get to know the philos…
Do you want to know how to make a graph with Microsoft Access? First, create a query with the data for the chart. Then make a blank form and add a chart control. This video also shows how to change what data is displayed on the graph as well as form…
Suggested Courses

752 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question