J'ai le problème suivant:

  • J'ai des mails qui arrivent dans ma boite aux lettres
  • ces mails contiennent une chaîne spécifique dans le corps
  • ce que je veux faire c'est:
    • - & gt; enlever cette ficelle du corps
    • - & gt; puis envoyer ce corps à une autre adresse mail (envoyer, pas transférer)

Qu'ai-je déjà fait?

UNE. Création d'une règle qui active le script dans les messages entrants contenant une certaine chaîne dans la description

Voici la description de la règle:

Apply to message
with "Maileater" in the subject
  and on this computer only
run "Project1.ChangeString"

B. Créé le script avec les instructions suivantes:

Public Sub ChangeString (MyMail As MailItem)

   Dim body As String
   body = MyMail.body

   body = Replace (body, "=====================================================", " ")
   MyMail.body = body

   MyMail.Save
End Sub

C. À présent, je souhaite ajouter au script l'instruction consistant à envoyer le corps (ou MyMail.body) à une adresse mail spécifique (par exemple, [email protected] avec la description "Support demandé") après le remplacement de la chaîne.

Est-ce possible?

Quelqu'un peut m'aider avec cela, je serais très reconnaissant, car cela éliminera beaucoup de travail manuel pour moi.

Ceci est juste un exemple de courrier, la vraie chose contiendra d'autres remplacements et mails à envoyer.

Guido Mertens
la source