ich habe vor kurzem für unsere Abteilung folgendes Script eingeführt, welches einem bei Versand die Möglichkeit der Archivierung bietet.
Klingt man ja, wird die Email zu einer BCC Adresse geschickt! (Archive)
Klingt man nein, wird sie nur normal gesendet.
Diese Abfrage möchte ich jetzt gerne duplizieren für eine neue FROM Adresse.
Der User soll bei Versand gefragt werden, ob er die Email von unserer neu eingerichteten Abteilungsadresse verschicken möchte, oder "normal"!
Ja -> From Adresse wird geändert auf "[email protected]"
Nein -> Versand von personalisierten Adresse ([email protected])
Das bisherige Script sieht so aus:
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean) Dim objMe As Recipient If MsgBox("BCC für Archivierung gewünscht?", vbYesNo + vbQuestion) = vbYes Then Set objMe = Item.Recipients.Add("[email protected]") objMe.Type = olBCC objMe.Resolve Set objMe = Nothing End If End Sub
Ist dies einfach ohne grösseren Aufwand abzuändern?
Danke und viele Grüße aus München!
Tom