[Okta Webinar] Learn how to a build a cloud-first strategyRegister Now

x
  • Status: Solved
  • Priority: Medium
  • Security: Public
  • Views: 637
  • Last Modified:

Lotus notes Assigned To property from vba

Hi Experts,

Is it possible to get the property called "Assigned to"?

We use this property in our department mailbox that we share and therefore assign mails to the one responsible for responding the mail.

An i would like to read this property when looping the inbox.

Is that possible?
0
DCRAPACCESS
Asked:
DCRAPACCESS
  • 3
  • 3
1 Solution
 
Sjef BosmanGroupware ConsultantCommented:
Try this

dim s as string
s= doc.getitemvalue("AssignedTo")(0)

AssignedTo is not a property but a field (more correctly: an item), the methode getitemvalue always returns an array, and index 0 is the first value.

Some more of your code would be nice... Next time?
0
 
DCRAPACCESSAuthor Commented:
did not work, this is my code:

Dim stPath, EMBED_ATTACHMENT, RICHTEXT, sletmail, frafolder, tilfolder, filnavnet
 
 stPath = ""
 filnavnet = ""
 frafolder = "($inbox)"
 tilfolder = ""
 EMBED_ATTACHMENT = 1454
 RICHTEXT = 1
 sletmail = ""


  Dim noSession
  Dim noDatabase
  Dim noView
  Dim noDocument
  Dim noNextDocument
  Dim Today
  Dim text
  Dim suffix
  
 
  Dim vaItem
  Dim vaAttachment
 
  Set noSession = CreateObject("Notes.NotesSession")
  Set noDatabase = noSession.GETDATABASE("w19732/EJBY/DDB", "DEPTMAIL\3780R3780DP.nsf")
  Set noView = noDatabase.GetView(frafolder)
  Set noDocument = noView.GetFirstDocument
  Do Until noDocument Is Nothing
    Set noNextDocument = noView.GetNextDocument(noDocument)
    Debug.Print noDocument.getitemvalue("AssignedTo")(0)
    Set noDocument = noNextDocument
  Loop
  Set noNextDocument = Nothing
  Set noDocument = Nothing
  Set noView = Nothing
  Set noDatabase = Nothing
  Set noSession = Nothing

Open in new window

0
 
Sjef BosmanGroupware ConsultantCommented:
Did you get some error message? Does it indicate a line where the execution stops? What if you run it in the debugger? Are you sure the code inside the loop of lines 29-33 is executed?

If you don't intend to use the UI classes, it should be better to use Lotus.NotesSession.
See also: http://www.ibm.com/developerworks/lotus/library/ls-COM_Access/
0
Free learning courses: Active Directory Deep Dive

Get a firm grasp on your IT environment when you learn Active Directory best practices with Veeam! Watch all, or choose any amount, of this three-part webinar series to improve your skills. From the basics to virtualization and backup, we got you covered.

 
DCRAPACCESSAuthor Commented:
Found it :-)

getitemvalue("RESPONSIBLE")(0)

But you code really helped me!!!!
0
 
DCRAPACCESSAuthor Commented:
You help me find the right way to get result i wanted!
0
 
Sjef BosmanGroupware ConsultantCommented:
Splendid!
0

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.

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