Overview

Previous  Next

---

DesktopMailMessage and SMTP objects allow you to send email messages using a SMTP server.

Example:

'SMTP is a SMTP object and Msg is a DesktopMailMessage

Sub Globals

End Sub

Sub App_Start

      Form1.Show

      SMTP.New1("host",587,"username","password")

      Msg.New1

      Msg.AddTo("address1@gmail.com,address2@gmail.com")

      Msg.Subject = "Important mail"

      Msg.Body = "Hi," & crlf & "How are you doing?"

      Msg.AddAttachment(AppPath & "\SomeDocument.doc")

      Msg.From = "support@basic4ppc.com"

      SMTP.Send(Msg.Value)

      Msgbox("Message was sent.")

End Sub