Ajoute un groupe de contacts dans le carnet d'adresses d'une messagerie Lotus Notes ou Outlook. La
structure Groupe permet de définir les données de ce groupe de contacts.
Attention : Cette fonction ne permet pas d'ajouter un groupe de contacts dans le carnet d'adresses d'une messagerie Outlook Express.
// Ouverture d'une session Lotus Notes
IDSession est un entier
IDSession = EmailOuvreSessionNotes("MotDePasse", "ServeurMars", ...
"mail\julie.nsf", "C:\Users\Julie\AppData\Local\Lotus\Notes\Data\user.id")
// Initialisation des variables de la structure Groupe
GroupeRAZ()
// Renseignements des variables pour le nouveau groupe
mGroupe.Nom = "Mes amis"
mGroupe.Description = "Groupe de mes amis"
mGroupe.NbContact = 3
mGroupe.Contact[1] = "Pierre"
mGroupe.Contact[2] = "Paul"
mGroupe.Contact[3] = "Jacques"
// Ajout du groupe
SI GroupeAjoute(IDSession) = Vrai ALORS
Info("Groupe de contacts ajouté")
SINON
Erreur("Erreur lors de l'ajout", ErreurInfo())
FIN
Syntaxe
<Résultat> = GroupeAjoute(<Identifiant de la session>)
Remarques
Les groupes de contacts ne sont pas gérés par Outlook version 97. Il n'est donc pas possible d'ajouter un groupe de contacts dans cette version de Outlook.
Composante : wd280com.dll