Solved

Outlook > Send to

Posted on 2007-03-23
8
281 Views
Last Modified: 2008-02-01
Hi

If i click on a file in explorer and go down to 'Send To > Mail Recipient' outlook will create a new email with this message:

It adds the files as an attachment and then this text as the body of the email:

 
The message is ready to be sent with the following file or link attachments:

20060517-1504 Letter.PDF


Note: To protect against computer viruses, e-mail programs may prevent sending or receiving certain types of file attachments.  Check your e-mail security settings to determine how attachments are handled.




Is there a way to stop it adding all this junk and having only say.. a signature at the bottom, ready for the user to type a message?

All suggestions appreciated!
0
Comment
Question by:MarkMichael
  • 5
  • 3
8 Comments
 
LVL 76

Accepted Solution

by:
David Lee earned 500 total points
ID: 18779174
I don't know of any way to alter that behavior, but I do know a way to get around it.  That is to create your own "Send To" link.  It's easier than it sounds and the benefit is that it gives you complete control over how Outlook behaves during this operation.  All that's required to create a "Send To" link is writing a script that you then place in your Send To folder.  Here's a sample script that emulates the behavior of the default Mail Recipient link.

Dim objArgs, olkApp, olkNS, olkMessage, strFilenames
Set objArgs = WScript.Arguments
If objArgs.Count > 0 Then
    Set olkApp = CreateObject("Outlook.Application")
    Set olkNS = olkApp.GetNamespace("MAPI")
    'Change the name of your profile on the next line if it's not Outlook
    olkNS.Logon "Outlook"
    Set olkMessage = olkApp.CreateItem(0)
    olkMessage.BodyFormat = 2
    For I = 0 to objArgs.Count - 1
        olkMessage.Attachments.Add objArgs(I)
        strFilenames = strFilenames & olkMessage.Attachments.Item(I+1).FileName & ", "
    Next
    If Right(strFilenames,2) = ", " Then
        strFilenames = Mid(strFilenames,1,Len(strFilenames) - 2)
    End If
    olkMessage.Subject = "Emailing: " & strFilenames
    olkMessage.Display
    olkMessage.HTMLBody = "Your files are attached and ready to send with this message." & olkMessage.HTMLBody
End If
Set objArgs = Nothing
Set olNS = Nothing
Set olApp = Nothing

The nice aspect of this approach is that I can change the script to do anything I want.  I can change the text in the message, add a signature, pretty much anything I can think of.  I practice I use two scripts, one for internal staff and another for external staff.  The script for internal staff creates links to the files instead of attaching them.  That helps keep the mail system clean.  The script for external staff actually attaches the files.  

To use the script above, copy the code and paste it into Notepad.  Now, save it in your Send To folder with a .vbs extension.  
0
 
LVL 15

Author Comment

by:MarkMichael
ID: 18779531
I have tested this, but when I click on a file and right click 'SendToTest.vbs' nothing happens. Am i doing somethign wrong?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 18779569
What version of Outlook do you have?  Is your Outlook profile named "Outlook"?  You can check that by going to Control Panel, clicking the Mail icon, then clicking Show Profiles.  If your profile is not named Outlook, then edit the script and change the profile name there to match your profile name.  I included a comment line in the script showing where that change needs to take place at.
0
Microsoft Certification Exam 74-409

Veeam® is happy to provide the Microsoft community with a study guide prepared by MVP and MCT, Orin Thomas. This guide will take you through each of the exam objectives, helping you to prepare for and pass the examination.

 
LVL 15

Author Comment

by:MarkMichael
ID: 18779627
I am using Outlook 2007 actually, perhaps this is my problem. My outlook mail profile is also named Outlook. Any other possibilities besides it being 2007 incompatibility?
0
 
LVL 76

Expert Comment

by:David Lee
ID: 18779669
I don't know if Outlook 2007 is the problem or not.  I'm going to test that right now.  In the meantime, what version of Windows are you on?  
0
 
LVL 76

Expert Comment

by:David Lee
ID: 18779762
I just tested with Outlook 2007 running on Windows XP and the script worked perfectly.
0
 
LVL 15

Author Comment

by:MarkMichael
ID: 18779829
I am running XP Pro SP2, I have added the file to the folder: C:\Documents and Settings\User\SendTo

I have just realised my problem, when doing the usual 'copy and paste' routine, always remember to paste!
;)
0
 
LVL 76

Expert Comment

by:David Lee
ID: 18780028
That does help.  Glad you got it working.  Cheers!
0

Featured Post

Efficient way to get backups off site to Azure

This user guide provides instructions on how to deploy and configure both a StoneFly Scale Out NAS Enterprise Cloud Drive virtual machine and Veeam Cloud Connect in the Microsoft Azure Cloud.

Question has a verified solution.

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

Follow this checklist to learn more about the 15 things you should never include in an email signature from personal quotes, animated gifs and out-of-date marketing content.
Find out what you should include to make the best professional email signature for your organization.
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 …
A short tutorial showing how to set up an email signature in Outlook on the Web (previously known as OWA). For free email signatures designs, visit https://www.mail-signatures.com/articles/signature-templates/?sts=6651 If you want to manage em…

803 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