Wrox Programmer Forums

Need to download code?

View our list of code downloads.

Go Back   Wrox Programmer Forums > Visual Basic > VB 6 Visual Basic 6 > VB Components
Password Reminder
Register
| FAQ | Members List | Search | Today's Posts | Mark Forums Read
VB Components Issues specific to components in VB.
Welcome to the p2p.wrox.com Forums.

You are currently viewing the VB Components section of the Wrox Programmer to Programmer discussions. This is a community of software programmers and website developers including Wrox book authors and readers. New member registration was closed in 2019. New posts were shut off and the site was archived into this static format as of October 1, 2020. If you require technical support for a Wrox book please contact http://hub.wiley.com
DRM-free e-books 300x50
Closed Thread
 
Thread Tools Search this Thread Display Modes
  #1 (permalink)  
Old July 20th, 2003, 11:13 PM
Registered User
 
Join Date: Jul 2003
Location: , , .
Posts: 1
Thanks: 0
Thanked 0 Times in 0 Posts
Default MAPI and outlook

Hi, everyone

I have a problem when using MAPI in MS outlook 2000.

My application uses MAPI to send the e-mail with a .pdf attachement.
It works fine when using MS outlook express, but when I try to send using MS outlook 2000 it keeps giving me the "error 32002"

My outlook configuration is using Workgroup or Corporation and I select outlook as my e-mail service but I don't use MS exchange server. Following are my sample code:

 sesMail.DownLoadMail = False
 sesMail.SignOn

 If sesMail.SessionID = 0 Then
        MsgBox "Unable to connect.", vbExclamation, App.Title
      Else

        With msgMail
          .SessionID = sesMail.SessionID
          .Compose
          .MsgSubject = sSubj
          .MsgNoteText = sBody
          If iAddressBook = 0 Then
            For i = 0 To UBound(sTos)
              .RecipIndex = i
              .RecipType = 1
              .RecipAddress = sTos(i)
            Next i
            For i = 0 To UBound(sCcs)
              .RecipIndex = UBound(sTos) + 1 + i
              .RecipType = 2
              .RecipAddress = sCcs(i)
            Next i
          End If
          .AttachmentPathName = sPath & sFile
          .AttachmentName = ""
          .Send True
        End With

      End If

      sesMail.SignOff

      Kill sPath & sFile

      Screen.MousePointer = vbDefault
    End If

I will appreciate any suggestions.

yuelie


Closed Thread


Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off
Trackbacks are Off
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
MAPI not working with MS Outlook alantodd Beginning VB 6 3 June 26th, 2006 10:55 AM
Outlook 97/2003 Mapi code chuckdaniels Access VBA 2 March 6th, 2005 04:09 PM
MAPI BobR VB Components 0 February 7th, 2005 07:47 PM
MAPI help kane C++ Programming 2 October 13th, 2004 12:41 AM
MAPI alantodd Pro VB 6 2 June 12th, 2003 09:11 AM



All times are GMT -4. The time now is 04:54 PM.


Powered by vBulletin®
Copyright ©2000 - 2020, Jelsoft Enterprises Ltd.
© 2013 John Wiley & Sons, Inc.