Solved

Forwarding mail via Outlook VBA script

Posted on 2004-04-15
3
979 Views
Last Modified: 2006-11-17
Hello everyone.

I got some suggestions from others here on a script and it works good except that the Outlook security message pops up with every message.  I seen Stefri had mentioned using Redemption on question Q_20914658 to overcome this problem, but I have yet to get it to work.  Does anyone have any suggestions on how to get this to work?

Sub FwdToMe(Item As Outlook.MailItem)
    Dim myitem As Outlook.MailItem
    Dim address As String
    Set myitem = Item.Forward
    address = "email address"
    myitem.Recipients.Add address
    myitem.Body = "WHATEVER TEXT YOU WANT TO INSERT" & vbCrLf & vbCrLf & myitem.Body
    myitem.Send
End Sub

0
Comment
Question by:rchandler6473
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
3 Comments
 
LVL 13

Accepted Solution

by:
Mob-bom earned 125 total points
ID: 10833726
I assume you are using Outlook XP with SP3?  If so, you can't avoid it, its a new security feature released with SP3.  You can workaround it with http://www.express-soft.com/mailmate/clickyes.html

This link will give you the background on the security feature: http://www.slipstick.com/outlook/esecup.htm
0
 
LVL 65

Expert Comment

by:rockiroads
ID: 10833791
Ive got outlook 2000, I dont get that msg, might have something to do with outlook security updates

you could try going into Tools/Options and look at the security tab

perhaps look at zone settings/customise,

is anything in there?
0
 

Author Comment

by:rchandler6473
ID: 10835312
I'm using Outlook 2003, but this is for SPAM so I can try it on Outlook 2000, but I was under the impression that I couldn't run scripts from the rules.  Outlook XP you can, but I haven't tried it yet.  I'll get the express-soft.com thing a try.
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Following basic email etiquette rules will help you write a professional email and achieve a good, lasting impression with your contacts.
Changing a few Outlook Options can help keep you organized!
This Experts Exchange video Micro Tutorial shows how to tell Microsoft Office that a word is NOT spelled correctly. Microsoft Office has a built-in, main dictionary that is shared by Office apps, including Excel, Outlook, PowerPoint, and Word. When …
This video shows how to remove a single email address from the Outlook 2010 Auto Suggestion memory. NOTE: For Outlook 2016 and 2013 perform the exact same steps. Open a new email: Click the New email button in Outlook. Start typing the address: …

738 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question