Envoyer un mail avec lotus notes depuis un script R

Postez ici vos questions, réponses, commentaires ou suggestions - Les sujets seront ultérieurement répartis dans les archives par les modérateurs

Modérateur : Groupe des modérateurs

Cédric Carpentier
Messages : 13
Enregistré le : 03 Juil 2008, 09:40

Envoyer un mail avec lotus notes depuis un script R

Messagepar Cédric Carpentier » 30 Sep 2008, 07:41

Bonjour,

J'essaye d'automatiser l'envoi d'un mail via ma mailing box lotus notes avec rue mais sans succes.

Je sais le faire en vba avec l'objet com Notes.NotesSession. Objet pour lequel R ne me donne aucune méthode a utiliser ( utilisation de la fonction comgetobjectinfo de la librairie rcom qui me retourne null alors que l'objet
Com existe bien)

Merci d'avance pour votre aide

Olivier Delaigue
Messages : 220
Enregistré le : 05 Déc 2006, 07:38

Messagepar Olivier Delaigue » 03 Oct 2008, 15:43

Personnellement, j'arrive à envoyer des emails avec R en appelant mailsend.exe.

Cédric Carpentier
Messages : 13
Enregistré le : 03 Juil 2008, 09:40

Messagepar Cédric Carpentier » 03 Oct 2008, 15:55

sous windows?

Cédric Carpentier
Messages : 13
Enregistré le : 03 Juil 2008, 09:40

Messagepar Cédric Carpentier » 03 Oct 2008, 15:56

si oui as tu un bout de code a me montrer?

Olivier Delaigue
Messages : 220
Enregistré le : 05 Déc 2006, 07:38

Messagepar Olivier Delaigue » 03 Oct 2008, 16:13

Oui, sous Windows.

Code : Tout sélectionner

mail <- function(address, subject, msg, cc = NULL, bc = NULL, attachment = NULL) {

  address <- paste("-t ", paste(address, collapse = ","), sep = "")
  cc <- ifelse(!is.null(cc), paste("-cc ",paste(cc, collapse = ","), sep = ""), "+cc")
  bc <- ifelse(!is.null(bc), paste("-bc ", paste(bc, collapse = ","), sep = ""), "+bc")
  a <- ifelse(!is.null(attachment), paste("-a", attachment, sep = " "), "")
  subject <- paste("-sub ", shQuote(subject), sep = "")
 
  msg <- paste(msg, "\nPrénom Nom\n",
  "------------------------------------------------",
  "oulahquelleestclassemasignature"
  "------------------------------------------------",
  sep = "\n")
  msg <- paste("-M", shQuote(msg), sep = " ")
 
  mystring <- paste("monrepertoire/mailsend.exe -d mondomaine.fr -smtp monsmtp.fr -f monadressemail.fr", address, cc, bc, subject, msg, a, sep = " ")
  system(mystring)

}

Olivier Delaigue
Messages : 220
Enregistré le : 05 Déc 2006, 07:38

Messagepar Olivier Delaigue » 03 Oct 2008, 16:16


jean lobry
Messages : 733
Enregistré le : 17 Jan 2008, 20:00
Contact :

Messagepar jean lobry » 03 Oct 2008, 19:14

Bonjour,

excusez ma très grande naïveté, mais à part de faire du spam je ne vois pas très bien l'utilité d'envoyer des e-mails en masse sous R. Pourriez vous éclairer ma lanterne sur l'objectif ? Je suis très perplexe. Pas d'ironie, je pose la question, c'est tout.

Amicalement,

Jean

Cédric Carpentier
Messages : 13
Enregistré le : 03 Juil 2008, 09:40

Messagepar Cédric Carpentier » 05 Oct 2008, 18:11

Le n'est pas du tout d'envoyer des mail en masse. Ça me permettra juste d'envoyer en automatique un mail d'erreur quand l'alimentation de ma base ne marche pas au service concerne. Faut pas voir le mal partout en plus ça me permettra de distribuer en auto mes différentes analyses et productions a tous les contacts.

Olivier Delaigue
Messages : 220
Enregistré le : 05 Déc 2006, 07:38

Messagepar Olivier Delaigue » 06 Oct 2008, 06:31

Par exemple, pour récupérer des résultats à distance lorsque l'on fait tourner un gros calcul et que l'on a plus accès à la machine (en programmant l'arrête de l'ordi après calcul pour ne pas gaspiller l'énergie, bien entendu :-) ).


Retourner vers « Questions en cours »

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 1 invité