Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Member Login




Remember Me
Forgot Password?
Join Us!

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Tek-Tips
*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.
Jobs from Indeed

Link To This Forum!

Partner Button
Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

Nro (Programmer) (OP)
13 May 02 19:54
Bonjour!

I want to know if it's possible to invoke the Outlook 2000 'New message' form from VFP 7.0 without opening Outlook at all (all the clients have Outlook on their machine).

Thanks in advance.

Nro
mgagnon (Programmer)
13 May 02 20:08
Do you mean without automating Outlook? Or Just not show it?

You can send e-mail without using Outlook totally, either with MAPI sessions, or SMTP, or CDO.DLL.
Nro (Programmer) (OP)
13 May 02 20:24
Salut.

Ok. Here some more infos

I want to show the new message form by automating Outlook.

I tried some code ...

  loOutlook = CREATEOBJECT("Outlook.Application")
  loNameSpace = loOutlook.GetNamespace("MAPI")
  loMail = loNameSpace.GetDefaultFolder(4)
  loMail.Display

This will create a new Outlook instance, select the Outbox folder and show Outlook interface. But whant I want is to create a new message, set the e-mail addresses and show the 'New mail' form so my user can change senders, add comments and so on.

Thanks

Nro
mgagnon (Programmer)
13 May 02 20:40
I'm sure what you want to do. Show Outlook or not,


oOutLookObject = CreateObject("Outlook.Application")
oEmailItem = oOutLookObject.CreateItem(MAILITEM)

WITH oEmailItem
   .Recipients.Add("me@somewhere.com")
   .Subject = "Automation sample"
   .Importance = 0
   .Body = "This is easy!"
   .display
ENDWITH

RELEASE oEmailItem
RELEASE oOutLookObject
mgagnon (Programmer)
13 May 02 20:57
Sorry, MAILITEM should be set to 0
like
# DEFINE MAILITEM 0

At the begining

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close