• Home
 · 
• Miscellaneous
 · 
• This program sends a email using the Microsoft Mapi Controls 6.0.

This program sends a email using the Microsoft Mapi Controls 6.0.

This program sends a email using the Microsoft Mapi Controls 6.0.

Rate This program sends a email using the Microsoft Mapi Controls 6.0.

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

    MS.NewSession = True
    MS.UserName = kaustubhz
    MS.Password = Form1.Tag
    MS.Action = 1
    MM.SessionID = MS.SessionID
    MM.FetchUnreadOnly = True
    txtSubject.Text = MM.MsgSubject
    txtMessage = MM.MsgNoteText
    MS.Action = 2
End Sub
Private Sub cmdSend_Click()
    MS.NewSession = True
    MS.Action = 1
    MM.SessionID = MS.SessionID
    MM.Compose
    MM.MsgSubject = txtSubject.Text
    MM.MsgNoteText = txtMessage
    'MM.MsgOrigAddress = "[email protected]"
    MM.RecipAddress = txtTo.Text
    MM.Send
    txtMessage.Text = ""
    MS.Action = 2
End Sub