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

How to capture the mail sent time, sent in IBM Lotus note 8.0.2 in Excel VBA 2003?

I am trying to capture the sent mail time in excel VBA which is sent through IBM Lotus notes and use this for my automation please help with a proper solutions

Thank you in advance
0
sri09
Asked:
sri09
  • 4
  • 3
1 Solution
 
Sjef BosmanGroupware ConsultantCommented:
Which time exactly do you need?

I can think of many times associated with mails, but a lot depends on the way you received or sent the mails.
0
 
sri09Author Commented:
When i sent a mail i have to catch the email address as well as sent time and date into my excel sheet
0
 
Sjef BosmanGroupware ConsultantCommented:
If it is for your application only, it already knows the time the Sent button is pressed. Which mail address do you want to catch? The destination address is in your application, the sender is the person logged in, the owner of the mail database. You might try the following:
      v= Evaluate(@NameLookup ( [NoUpdate]; @UserName; "InternetAddress")

If you want to trace all mails passing through the server, you'd better ask the Administrator to enable Mail Journalling on the server.
0
Concerto Cloud for Software Providers & ISVs

Can Concerto Cloud Services help you focus on evolving your application offerings, while delivering the best cloud experience to your customers? From DevOps to revenue models and customer support, the answer is yes!

Learn how Concerto can help you.

 
sri09Author Commented:
i have to capture the the time and email address(To,CC,Subject) to excel sheet....


If u can give a example from outlook sent mails details to excel sheet it is also fine....
0
 
Sjef BosmanGroupware ConsultantCommented:
Sorry, your question is much too broad. Can you detail the question? I really need specifics. What exactly is your assignment?? With the emphasis on "exactly".

Did you have a look at the Mail Journalling feature of a Domino server?
See http://www-12.lotus.com/ldd/doc/domino_notes/Rnext/help6_admin.nsf/b3266a3c17f9bb7085256b870069c0a9/15bca374899a80f685256c1d00395e38?OpenDocument
0
 
sri09Author Commented:
Sorry. I do not understand what is the difficulty in understanding my straight  forward question.
When I send a mail to someone, it will be sent on some particular date and time and i want to capture the date and time of the sent mail for my automation. please find the image for better understanding.


Thank you    
-6781A3D24E1AD983.bmp
0
 
Sjef BosmanGroupware ConsultantCommented:
Ah, I was thinking more difficult. I often send mails that I do not keep in my mail database. Those mail would not be recorded by your application. I assumed that you needed an exact overview of all mails sent through the server.

For detailed info:
http://www.redbooks.ibm.com/abstracts/SG245670.html?Open

' requires early binding

Dim s As New NotesSession
s.Initialize
Dim dir As NotesDbDirectory
Dim db As NotesDatabase
Dim vw As NotesView
Dim doc As NotesDocument
Set dir = s.GetDbDirectory("")
Set db = dir.OpenMailDatabase
Set vw= db.GetView("($Sent)")
Set doc= vw.GetFirstDocument
Do Until doc Is Nothing
	:
	:
	Print doc.PostedDate(0) ' the field PostedDate contains the value you're looking for
	:
	:
	Set doc= vw.GetNextDocument(doc)
Loop

Open in new window

0

Featured Post

Keep up with what's happening at Experts Exchange!

Sign up to receive Decoded, a new monthly digest with product updates, feature release info, continuing education opportunities, and more.

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