Script de charge R5 IMAP

Les différents scripts de charge IMAP se présentent comme suit.

Exemple de script de charge d'initialisation IMAP

Le texte entouré d'astérisques (**) est un commentaire.

**Script permettant d'initialiser les bases de données pour le script courrier NotesBench IMAP ; attente de 0 à 5 minutes (5 min

pause 0-300000

**En cas d'erreur, attente de 1 à 5 minutes avant de réessayer**

errordelay 60000-300000

**Création du fichier courrier**

changeto "[MailServer]!!mail[#].nsf" [MailTemplate]

**Définition du propriétaire**

Setcalprofile

**Activation d'IMAP pour le fichier courrier**

console [MailServer] load convert -m mail[#].nsf
pause 60 000

**Vérification que la base courrier contient suffisamment de documents (une fois seulement)**

beginloop
sendssmtpmessage [NormalMessageSize] [MessageLineSize]
mail[#]@[RecipientDomain]
[SMTPHost] [RecipientDomain] [ClientHost]
rewind [NumMailNotesPerUser]
pause 60 000

**Ouvrir les vues**

ouvrir $FolderInfo
close
ouvrir $FolderRefInfo
close
open $Inbox
close
drop

Exemple de script de charge IMAP

Le texte entouré d'astérisques (**) est un commentaire.

**Attente de l'échelonnement correct des différents processus (durée aléatoire) ; attente de 0 à 3 minutes (3 min

Pause 0-180000

**Vérification que le script ne ferme pas en cas d'erreur.**

if [R5IMAPBreak]
break 0

**En cas d'erreur, attente de 1 à 2 minutes avant de réessayer.**

ErrorDelay 60 000-120 000

**Début de la boucle externe**

BeginLoop

**Etablissement d'une connexion IMAP / Ouvrir la base courrier**

ImailLogin [IMAPHost] Mail[#] NotesBench

**Attente de 8 à 12 minutes avant l'accélération**

Pause 480 000-720 000

**Liste de toutes les boîtes aux lettres**

ImailListMailboxes

**Ouvrir le dossier COURRIER EN ARRIVEE**

ImailOpenMailbox INBOX

**Début de la boucle interne**

BeginLoop2

**Obtention de la dernière page d'entrées de la boîte aux lettres**

ImailGetLastEntries

**Attente de 5 à 10 secondes avant de parcourir la vue**

**Lecture de 5 messages de la boîte aux lettres, suppression de 2 messages, envoi d'un message. Lecture de chaque message durant 10 à 20 secondes**

ImailFetchOld CURRENT

**Attente de 10 à 20 secondes**

Pause 10 000-20 000
ImailFetchOld NEXT

**Attente de 10 à 20 secondes**

Pause 10 000-20 000
ImailFetchOld NEXT

**Attente de 10 à 20 secondes**

Pause 10 000-20 000

**Suppression du message actuel**

ImailDeleteEntry

**Attente de 10 à 20 secondes**

Pause 10 000-20 000
ImailFetchOld NEXT

**Attente de 10 à 20 secondes**

Pause 10 000-20 000
ImailFetchOld NEXT_UNSEEN
ImailSetSeen

**Attente de 10 à 20 secondes**

Pause 10 000-20 000

**Envoi (ajout) du message au dossier COURRIER EN ARRIVEE**

Imailpostmessage [NormalMessageSize] [MessageLineSize] INBOX

**Attente de 10 à 20 secondes**

Pause 10 000-20 000

**Suppression d'un autre message**

ImailDeleteEntry

**Attente de 10 à 20 secondes**

Pause 10 000-20 000

**Création d'un message (temps d'écriture : 1 à 2 minutes)**

Pause 60 000-120 000

**Envoi d'un message SMTP, recherches LDAP de numéros de destinataires spécifiques**

sendssmtpmessage [NormalMessageSize] [MessageLineSize]  sendsmtpmessage [NormalMessageSize] [MessageLineSize] [NumMessageRecipients] [SMTPHost] [RecipientDomain] [ClientHost] [NthIteration]

**Attente sur le bureau de 8 à 12 minutes lors d'une réunion en interne**

Pause 515 000-755 000

**Vérification de l'arrivée de nouveaux messages**

ImailCheckForNewMail

**Répétition de la séquence de boucles internes (retour à l'instruction BeginLoop2)**

rewind2 [R5IMAP_LOOP_N]

**Déconnexion et exécution d'une autre activité durant 3 à 6 minutes**

IMAILCloseMailbox
ImailLogout 
Pause 180 000-360 000

**Retour à la boucle externe (retour à l'instruction BeginLoop)**

rewind [ScriptIterationLimit]