Outlook 2010'da eksiz olarak bir e-posta göndermek üzere olduğum konusunda kendimi nasıl uyarırım?

Gmail, beni bir eke gönderme yapan bir e-posta göndermek üzere olduğum konusunda uyardığı ancak hiçbir şey eklemediğim konusunda bu şaşırtıcı özelliğe sahiptir. Bunu Outlook 2010'da da yapmanın bir yolu var mı?

VBA komut dosyalarına, Özel Kurallara veya Özel Eklentilere açığım

Outlook 2013 bu özelliğe sahiptir, böylece herhangi bir gümrük komut dosyası veya eklenti eklemenize gerek kalmaz.

Özellikle Outlook 2010 için sorsanız bile , aşağıdaki komut dosyası 2010 ve önceki sürümlerinde de çalışmalıdır:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
   If InStr(1, Item.Body, "attach", vbTextCompare) > 0 Then
        If Item.Attachments.Count = 0 Then
          answer = MsgBox("There's no attachment, send anyway?", vbYesNo)
          If answer = vbNo Then Cancel = True
        End If
   End If
End Sub

Bu size aşağıdakine benzer bir uyarı verecektir:

Düğmesine basmak yes, e-postayı yine de gönderirken, basmak , e-postayı nogöndermeyi durduracak ve böylece eki ekleyebilmenizi sağlayacaktır.

İşte güncellenmiş bir versiyonu. Cevaplar daha önceki mesajları içerdiğinden ve cevap gövdesinin nerede olduğunu belirlemek için hızlı ve kolay bir yol bulunmadığından ve alıntılanan mesajın ne zaman başlayacağını / bittiğini, bu size cevapları sormaz:

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If InStr(1, Item.Subject, "RE:", vbTextCompare) = 0 Then
       If InStr(1, Item.Body, "attach", vbTextCompare) > 0 Then
            If Item.Attachments.Count = 0 Then
              answer = MsgBox("There's no attachment, send anyway?", vbYesNo)
              If answer = vbNo Then Cancel = True
            End If
       End If
    End If
End Sub

Ayrıca, her iki durumda da (değiştirilmiş ve orijinalim) bir dosya eklemek isteyip istemediğiniz 'attach' kelimesini içeren herhangi bir orijinal e-postanın size sorulacağı not edilmelidir.