Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Using the ItemSend Event
Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
    If Item.Subject = "" Then
        MsgBox "Please add a subject line to this message."
        Cancel = True
    End If
End Sub