Hi,

I want change the signature email for users.

many user are Notes Client with french version

many others with english version.

I realize the "Default Sans Serif" for english version are not the same as "Sans Serif par défaut"

also when I use the code 

    nrts.NotesFont = nrti.GetNotesFont("Default Sans Serif")'"Sans Serif par défaut", True)

   The font of french users are not set properly.  Some of them doesn't have the "Default Sans Serif" font (weird is a basic one)

   

So how can I know the language version of Notes client to set the good font?

here a sample of my code

' =====================================

...

    Set nrti = New NotesRichTextItem(pnd, "Empl_SignatureElement3")
    Call nrti.Addnewline(1)
    

    MessageBox CStr(nrti.GetNotesFont("Default Sans Serif", True)), 48, "Default Sans Serif"   ' output 5
    MessageBox CStr(nrti.GetNotesFont("Sans Serif par défaut", True)), 48, "Sans Serif par défaut"   ' output 6
    
    ' Définition du Style
    Set nrts = gns_A.CreateRichTextStyle
    'nrts.NotesFont = nrti.GetNotesFont(5)'"Default Sans Serif", True)
    nrts.NotesFont = nrti.GetNotesFont(6)'"Sans Serif par défaut", True)
    nrts.FontSize = 10
    nrts.Bold = True
    Call nrti.AppendStyle(nrts)
    Call nrti.AppendText(Trim(v_Element))
    
    nrts.Bold = False
    Call nrti.AppendStyle(nrts)

' ========================================

 

Regards