Fragen zu Skript

12/12/2007 - 10:54 von Thomas Frank | Report spam
Ich benutze folgendes Skript zum Synchronisieren meiner gesendeten Mails
zwischen drei Rechnern (OL2007):

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim objMe As Recipient
Set objMe = Item.Recipients.Add("gesendet1@xxx.de")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
Set objMe = Item.Recipients.Add("gesendet2@xxx.de")
objMe.Type = olBCC
objMe.Resolve
Set objMe = Nothing
End Sub

Außerdem verwende ich OLFolderSync zum Synchronisieren von Kalender,
Aufgaben etc. Dieses Programm sendet für jede Änderung eine e-mail an die
beiden anderen Rechner und dort werden die Änderungen dann verarbeitet.

Problem: O.a. Script làuft auch bei den von OLFolderSync gesendeten e-Mails
ab, und das führt manchmal zu Endlosschleifen.

Frage: Wie kann ich in dem o.a. Script die Bedingung einbauen, dass e-Mails
mit einer bestimmten Betreffzeile nicht als BCC versendet werden?

Vielen Dank für jeden Tipp!
Thomas
 

Lesen sie die antworten

#1 Thomas Frank
12/12/2007 - 11:20 | Warnen spam
Frage: Wie kann ich in dem o.a. Script die Bedingung einbauen, dass


e-Mails
mit einer bestimmten Betreffzeile nicht als BCC versendet werden?



Ergànzung: Genaugenommen müsste die Abfrage heissen: wenn Betreffzeile eine
bestimmte Zeichenfolge enthàlt.

Ähnliche fragen