Solved

Email a document as attachment

Posted on 2001-06-22
14
255 Views
Last Modified: 2010-05-02
Using Word 97 I would like to be able to email a document (with a button or macro within the document) to a person in my Outlook 98 address book.  It may be a different person each time, so I would have to have some way to select.  Is it possible?  If so, I will up the points for the correct answer.
0
Comment
Question by:dcurtis
  • 6
  • 5
  • 3
14 Comments
 

Expert Comment

by:russhack
Comment Utility
add a macro from word and the outlook reference.
the code for the email should look like this.
because you use word 97 you have to save the document to attach it.  the display at the bottom shows the email... you can then go and select your "TO:".  If you want to code in a email address... add the
itmmail.recipients.add (emailaddress)
or subject.
itmmail.subject = "MY SUBJECT"
or body
itmmail.body = "MY TEXT HERE."
to automatically send, change the itmmail.display to itmmail.send

sub sendit()
activedocument.saveas "c:\mailit.doc"
set olapp = new outlook.application
set itmmail = olapp.createitem(olmailitem)
set att = itmmail.attachments
att.add "c:\mailit.doc"
itmmail.display
set olapp = nothing
set itmmail = nothing
end sub
0
 

Author Comment

by:dcurtis
Comment Utility
The line set olapp=new outlook.application produced the folloing.  Compile Error  user-defined type not defined.

Will it matter if I already have outlook open?
0
 

Expert Comment

by:russhack
Comment Utility
have you added the Microsoft Outlook reference?
0
 

Author Comment

by:dcurtis
Comment Utility
I guess I didn't understand the first time.  How do I add the reference?  VB is all new to me?
0
 

Expert Comment

by:russhack
Comment Utility
In VB te Tools menu... References...

check the Microsoft Outlook 8.0 Object Library

0
 

Expert Comment

by:russhack
Comment Utility
In VB te Tools menu... References...

check the Microsoft Outlook 8.0 Object Library

0
 

Author Comment

by:dcurtis
Comment Utility
I guess I didn't understand the first time.  How do I add the reference?  VB is all new to me?
0
How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

 

Author Comment

by:dcurtis
Comment Utility
All I have is the MS Outlook 8.0 Object Model.  Is that the same thing?
0
 
LVL 100

Accepted Solution

by:
mlmcc earned 200 total points
Comment Utility
Do you have Word open with the document loaded when you want to do this?  If so why not use Word's Send To menu option (File--> Send To--> Mail Recipient

good luck
mlmcc
0
 

Expert Comment

by:russhack
Comment Utility
It is the same thing.... The File--> Send To--> Mail Recipient is only for Office 2K products.
0
 

Author Comment

by:dcurtis
Comment Utility
OK.  See what happens when I try to over complicate thigs.  Thanks for the answer.
0
 
LVL 100

Expert Comment

by:mlmcc
Comment Utility
No I only have Office 97 and I have the capability.

mlmcc
0
 

Expert Comment

by:russhack
Comment Utility
I stand corrected.... Mimcc, is that some plug-in or SP that gives you that added functionality?  If so, it's easy to upgrade.
0
 
LVL 100

Expert Comment

by:mlmcc
Comment Utility
I don't think it is a plug-in.  It may be in SP1 or SP2.  We have a standard load on our LAN.  On my standalone development machine, I loaded MS Office with SP2 and have the ability to send files.

good luck
mlmcc
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

When trying to find the cause of a problem in VBA or VB6 it's often valuable to know what procedures were executed prior to the error. You can use the Call Stack for that but it is often inadequate because it may show procedures you aren't intereste…
Have you ever wanted to restrict the users input in a textbox to numbers, and while doing that make sure that they can't 'cheat' by pasting in non-numeric text? Of course you can do that with code you write yourself but it's tedious and error-prone …
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the utilization of class modules. Class modules can be a powerful tool in Microsoft Access. They allow you to create self-contained objects that encapsulate functionality. They can easily hide the complexity of a process from…

762 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

Need Help in Real-Time?

Connect with top rated Experts

9 Experts available now in Live!

Get 1:1 Help Now