Trim name

In a form I have the field INsupv, containing the name of a person with some references of the company behind it e.g.:Manuel Calderon/0L/Exxon.

I want to use this field as header in an E-mail with the instruction

Call rtitem.AppendText("Dear " + doc.INsupv(0) + “,” )

but I want to avoid the annoying “/0L/Exxon”.

Any idea how I can do this?

Subject: Trim name

Dim strPersonName As String		Dim nn As NotesName



Set nn = New NotesName( strName )

strPersonName = nn.Abbreviated



Msgbox strPersonName

Subject: RE: Trim name

Should use “CommonUserName” property instead of “Abbreviated” as mentioned by Danny.

ie. nn.CommonUserName

Subject: Trim name

Try this:NotesMacro$=“@Name([CN];” + doc.INsipv(0) + “)”

result = Evaluate(NotesMacro$, doc)

Call rtitem.AppendText("Dear " + result + “,” )

Cheers

Teck-Lung