Be seen. Boost your question’s priority for more expert views and faster solutions
How do I Find the Username of a Mailbox other than my own in LotusScript
Hello,
I have written a Public shared Agent that exports selected E-Mails for a given user to a file for Optical storage. One of the fields used to identify the document in storage is the User's Name. I currently get the Username from the property "CommonUserName" from the Current Session. This works fine while users are archiving there own E-Mails, but it creates a problem when users Archive E-Mails on some else’s behalf. When I run my script on another users Mailbox from my notes session the E-Mails are identified as being mine instead of the proper user. This is a problem for the secretaries at my location for the do the Archiving for the Bosses.
So ultimately what I'm asking is how do you determine in LotusScript the Username on a specific Mailbox, not on a Specific Session?
I have written a Public shared Agent that exports selected E-Mails for a given user to a file for Optical storage. One of the fields used to identify the document in storage is the User's Name. I currently get the Username from the property "CommonUserName" from the Current Session. This works fine while users are archiving there own E-Mails, but it creates a problem when users Archive E-Mails on some else’s behalf. When I run my script on another users Mailbox from my notes session the E-Mails are identified as being mine instead of the proper user. This is a problem for the secretaries at my location for the do the Archiving for the Bosses.
So ultimately what I'm asking is how do you determine in LotusScript the Username on a specific Mailbox, not on a Specific Session?
Asked:
3
1 Solution
Here is the function to obtain the owner name of the mail file
Dim s As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Set db=s.currentdatabase
Set doc=db.getprofiledocument(
If doc.owner(0)<>"" Then
OwnerName=doc.owner(0)
End If
Dim s As New notessession
Dim db As notesdatabase
Dim doc As notesdocument
Set db=s.currentdatabase
Set doc=db.getprofiledocument(
If doc.owner(0)<>"" Then
OwnerName=doc.owner(0)
End If
Hello HemanthaKumar,
I tried your script and I noticed in the debugger that the db.Title was the same as the Mailbox Name. I think I will use that instead unless there is a problem of reliablity.
I tried your script and I noticed in the debugger that the db.Title was the same as the Mailbox Name. I think I will use that instead unless there is a problem of reliablity.
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 Already a member? Login.
Featured Post
Tackle projects and never again get stuck behind a technical roadblock.
Join Now
~Hemanth