This message was edited by pasa at 2007-2-9 3:36:35

---

Hi everyone,
I have try to send a email from my VB project. Email was sent well, I know about it because I check my mailbox, where my program sent email to; but I dont know how to check whether my currently email has already been sent to another mailbox (for ex: mail box of my friend) or not?
So please help me to solve this prob. Thx in advance.

MAPIMessages1.msgsent always returns FALSE!?

This is my code:

    'Sign in
    MAPISession1.DownLoadMail = False
    MAPISession1.LogonUI = False
    MAPISession1.SignOn
    MAPIMessages1.MsgIndex = -1
    MAPIMessages1.SessionID = MAPISession1.SessionID
    
    'Compose email
    MAPIMessages1.Compose
    MAPIMessages1.RecipDisplayName = EmailAdress
    MAPIMessages1.MsgSubject = "Example"
    MAPIMessages1.MsgNoteText = "Don't delete this file please"
    MAPIMessages1.AttachmentPathName = ("C:\test.txt")
    MAPIMessages1.ResolveName
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    'For testing
    MsgBox (MAPIMessages1.MsgSent) 'false - I think it's correct
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''

    MAPIMessages1.Send

    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    'For testing
    MsgBox (MAPIMessages1.MsgSent) 'Always be FALSE ?? WHY?
    ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    MAPISession1.SignOff

    MsgBox (MAPIMessages1.MsgSent) 'FALSE too!!?????

: Hi everyone,
: I have try to send a email from my VB project. Email was sent well, I know about it because I check my mailbox, where my program sent email to; but I dont know how to check whether my currently email has already been sent to another mailbox (for ex: mail box of my friend) or not?
: So please help me to solve this prob. Thx in advance.
:
: This is my code:
:
:

:     'Sign in
:     MAPISession1.DownLoadMail = False
:     MAPISession1.LogonUI = False
:     MAPISession1.SignOn
:     MAPIMessages1.MsgIndex = -1
:     MAPIMessages1.SessionID = MAPISession1.SessionID
:     
:     'Compose email
:     MAPIMessages1.Compose
:     MAPIMessages1.RecipDisplayName = EmailAdress
:     MAPIMessages1.MsgSubject = "Example"
:     MAPIMessages1.MsgNoteText = "Don't delete this file please"
:     MAPIMessages1.AttachmentPathName = ("C:\test.txt")
:     MAPIMessages1.ResolveName
:     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
:     'For testing
:     MsgBox (MAPIMessages1.MsgSent) 'false - I think it's correct
:     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
: 
:     MAPIMessages1.Send
: 
:     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
:     'For testing
:     MsgBox (MAPIMessages1.MsgSent) 'Always be FALSE ?? WHY?
:     ''''''''''''''''''''''''''''''''''''''''''''''''''''''''
:     MAPISession1.SignOff
: 
:     MsgBox (MAPIMessages1.MsgSent) 'FALSE too!!?????
: 

: