IDSession est un entier
IDSession = EmailOuvreSessionNotes("MotDePasse", "ServeurMars", ...
"mail\julie.nsf", "C:\Users\Julie\AppData\Local\Lotus\Notes\Data\user.id")
...
NotesDocumentPremier(IDSession)
TANTQUE NotesEnDehors(IDSession) = Faux
ListeAjoute(LISTE_DocumentTrouve, NotesChamp(IDSession, "Nom"))
NotesDocumentSuivant(IDSession)
FIN