Serienmail mit Verzögerung schicken

Home-›Foren-›Outlook-›Outlook Allgemein-›Serienmail mit Verzögerung schicken

3 Antworten anzeigen - 1 bis 3 (von insgesamt 3)
  • Autor
    Beitrag
  • #138661
    Unbekannt
    Participant

      Da kann ich dir leider auch nicht helfen, aber vielleicht du mir. Ich möchte eine einzelne mail zeitversetzt verschicken. Ich finde da aber bei outlook keine möglichkeit. Weißt du da rat?
      Gruß Menzi

      #138667
      Unbekannt
      Participant

        das kann ich wohl. also bei OL2003 ist diese funktion über option erreichber, du mußt einen haken setzen bei \”übermittlung verzögern bis\” und dann auf senden. du mußt anschließend die nachrichten senden/empfangen. zum endgültigen (automatischen) senden mußt du wahrscheinlich online sein.

        gruß raus,

        #1029510
        Markus Schulz
        Participant

          In Outlook mit Alt+F11 z.B. folgenden Code verwenden. Hier wird je Email auch noch 20 Sekunden verzögert.

           

          Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
          Dim xMail As Outlook.MailItem
          On Error GoTo xError

          If (Item.Class <> olMail) Then Exit Sub

          Set xMail = Item
          xMail.DeferredDeliveryTime = DateSerial(DateAdd(“s”, 20 * Application.GetNamespace(“MAPI”).GetDefaultFolder(olFolderOutbox).Items.Count, dateserial(2023,08,18)+timeserial(20,30,00))

          Exit Sub
          xError:
          MsgBox “ItemSend: ” & Err.Description, , “Error”
          End Sub

        3 Antworten anzeigen - 1 bis 3 (von insgesamt 3)

        Hat Ihnen der Beitrag gefallen?

        1 Stern2 Sterne3 Sterne4 Sterne5 Sterne (Keine Bewertung vorhanden)
        Loading...