how to set outlook 2003to cannot send mail without subject,attachm

[venu]

how to set outlook 2003to cannot send mail without subject,attachment at
client side

 

[Alan Moseley]

Insert the following code into your ThisOutlookSession code window.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim mi As MailItem
Set mi = Item
If mi.Subject = "" Or mi.Attachments.Count = 0 Then
Cancel = True
End If
set mi=Nothing
End Sub

 

[venu]

Thanks a lot for your responce its working.

Insert the following code into your ThisOutlookSession code window.

Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim mi As MailItem
Set mi = Item
If mi.Subject = "" Or mi.Attachments.Count = 0 Then
Cancel = True
End If
set mi=Nothing
End Sub

--
Alan Moseley IT Consultancy
http://www.amitc.co.uk

If I have solved your problem, please click Yes below. Thanks.