: macro = |@ReplaceSubstring(@ReplaceSubstring(@Name([Abbreviate]; @UserName); " "; "_"); "/"; "-")| dummy = Evaluate(macro) 'Evaluate is used to skip server name uname=dummy(0) key = dummy(0) & "_" & "OPEN"
If you are running the agent over the Web, this is actually fairly simple and you won't need Evaluate. You simply use the Remote_User CGI variable. A simple LotusScript example follows:
Dim nsCurrent as New NotesSession
Dim ndocWeb as NotesDocument
Dim strUser as String
Set ndocWeb=nsCurrent.DocumentContext
strUser=ndocWeb.Remote_User(0)
This was first published in May 2002