Hi, I need send email on behalf in lotus notes in VBA.
Example:
Set session = CreateObject("Notes.NotesSession")

UserName = session.UserName ' here I need send on behalf[/COLOR]

MailDbName = Left$(UserName, 1) & Right$(UserName, (Len(UserName) - InStr(1, UserName, " "))) & ".nsf"

Set Maildb = session.GetDatabase("", MailDbName)

Thanks