Login | Register   
LinkedIn
Google+
Twitter
RSS Feed
Download our iPhone app
TODAY'S HEADLINES  |   ARTICLE ARCHIVE  |   FORUMS  |   TIP BANK
Browse DevX
Sign up for e-mail newsletters from DevX


Tip of the Day
Language: Enterprise
Expertise: Beginner
Jun 25, 2001

Remove vbs Attachments in Outlook


Home users of Outlook must create a new form and make it the default form for their Inbox. This code removes any attachments with vbs in the filename on incoming mail and stops any outgoing mail with a vbs attachment and must be pasted into the new form using the script editor. This should only be used for processing incoming e-mails as the vbscript may cause concern for recipients.
 
Function Item_Read()

	dim lngCounter

	lngCounter = 1

	Do While lngCounter < Me.Attachments.Count
		If InStr(1, LCase  Attachments.ItemlngCounter).
FileName), 
Alex Whyte
 
Comment and Contribute

 

 

 

 

 


(Maximum characters: 1200). You have 1200 characters left.

 

 

Sitemap
Thanks for your registration, follow us on our social networks to keep up-to-date