Word 2003 AND Calling Outlook 2003

S

SkyEyes

We have several templates with a VB fill-in form that eventually gets send
via email. We just are moving to Outlook 2003 from Groupwise and receive the
message "A program is trying to access e-mail addresses you have stored in
Outlook. Do you want to allow this?

When have to check the check box and select YES for access. We want users
to not have to receive this message. We still have several users utilizing
Groupwise so we can't attach the Outlook Reference library. Here is the code
we were using below. We also want people at home to be able to utilize these
forms and they might not have outlook. Any suggestions without receiving the
prompt above.

Sub OutLK()

Dim objOL As Object
Dim objLO As Object
Dim objMessage As Object

On Error GoTo ErrorHandle

Set objOL = CreateObject("outlook.application")
Set objLO = objOL.CreateItem(0)
objLO.Display

With objLO
.Subject = strSubject
.Recipients.Add strRecip 'emails correct recipient
.Body = strBody
.attachments.Add (ActiveDocument.FullName)
.Send
End With

Exit Sub

Exit_errorHandle:
Exit Sub

'handles error sending email
ErrorHandle:
MsgBox Err.Description & Err.Number
MsgBox "Email Malfunction, please contact the Help Desk.", vbOKOnly
Resume Exit_errorHandle
End Sub
 
D

Doug Robbins - Word MVP

May not be workable in your situation, but, you can get
around that by using the "Express Click Yes" utility to which you will find
a link in the article "Mail Merge to E-mail with Attachments" at:

http://word.mvps.org/FAQs/MailMerge/MergeWithAttachments.htm


--
Hope this helps.

Please reply to the newsgroup unless you wish to avail yourself of my
services on a paid consulting basis.

Doug Robbins - Word MVP
 
J

Jean-Guy Marcil

Doug Robbins - Word MVP was telling us:
Doug Robbins - Word MVP nous racontait que :
May not be workable in your situation, but, you can get
around that by using the "Express Click Yes" utility to which you
will find a link in the article "Mail Merge to E-mail with
Attachments" at:
http://word.mvps.org/FAQs/MailMerge/MergeWithAttachments.htm

Or Redemption:
http://www.dimastr.com/redemption/

--
Salut!
_______________________________________
Jean-Guy Marcil - Word MVP
(e-mail address removed)
Word MVP site: http://www.word.mvps.org
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top