Actuellement, la fonction Mail de JSL vous permet d'envoyer des e-mails à une liste d'adresses e-mail valides, mais elle le fait en incrémentant la liste et en envoyant un e-mail individuel à chaque destinataire.Sur une machine où le client de messagerie nécessite une intervention de l'utilisateur pour autoriser l'envoi d'un e-mail par JMP (par exemple, Outlook sous Windows dans un environnement d'entreprise), cela signifie que l'utilisateur doit s'asseoir et attendre un message d'avertissement pour chaque destinataire, parfois avec un -en retard !Ceci est très inefficace et signifie que l'envoi d'un rapport aux parties prenantes intéressées nécessite autant, sinon plus de temps lorsqu'il est automatisé à l'aide de la fonction Mail que pour simplement copier et coller manuellement le rapport dans un e-mail.
Version 16.2.0 de JMP
Exemple de code (suppose que les rapports sont enregistrés dans le dossier temporaire au format png, utilise des adresses e-mail factices) :
sites = {"Site-1", "Site-2"};
report_path = Convert File Path( "$TEMP" );
default_dn = "example.com";
maillist = Associative Array(
sites,
{{// Site-1
"support@example.com", "stakeholder1@example.com", "stakeholder2@example.com", "stakeholder3@example.com"},
{// Site-2
"support@example.com", "stakeholder3@example.com", "vpsales@example.com"}}
);
For( i = 1, i <= N Items( sites ), i++,
site = sites[i];
rep_title = Eval Insert( "^site^_Report" );
temp_file_path = Convert File Path( report_path || "/" || rep_title || ".png" );
winmail = New Window( Eval Insert( "Send ^site^ Email" ),
V List Box(
Lineup Box( N Col( 2 ),
Text Box( "To:" ),
H List Box(
lb_to = List Box( maillist[site], <<NLINES> 0,
newl = lb_to << Get Items;
For( i = N Items( newl ), i > 0, i--,
If( Contains( seli, i ),
Remove From( newl, i )
)
);
lb_to << Set Items( newl );
);
)
)
),
Text Box( "Subject:" ),
teb_subj = Text Edit Box( rep_title ),
Text Box( "Body:" ),
teb_body = Text Edit Box(
Eval Insert( "Hello All,\!N\!tPlease find ^rep_title^ attached.\!N\!N" ),
<<SETNLINES></SETNLINES></NLINES>