Visual Basic 6.0 Send Email Using Office365 SMTP - Chilkat Examples

Trang chủ » Visual Basic Send Email Office 365 » Visual Basic 6.0 Send Email Using Office365 SMTP - Chilkat Examples

Có thể bạn quan tâm

(Visual Basic 6.0) Send Email using office365 SMTP

Demonstrates how to send an email using Office365.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' The mailman object is used for sending and receiving email. Dim mailman As New ChilkatMailMan ' Set the SMTP server to Office365's SMTP server. ' Note: Please be sure to double-check the SMTP settings ' with your provider or with the official Office365 documentation ' provided by Microsoft. The required settings could change... mailman.SmtpHost = "smtp.office365.com" mailman.SmtpPort = 587 mailman.StartTLS = 1 ' Set the SMTP login/password mailman.SmtpUsername = "OFFICE365_USERNAME" mailman.SmtpPassword = "OFFICE365_PASSWORD" ' Create a new email object Dim email As New ChilkatEmail email.Subject = "This is a test" email.Body = "This is a test" email.From = "My Name <[email protected]>" Dim success As Long success = email.AddTo("Chilkat Admin","[email protected]") ' Call SendEmail to connect to the SMTP server and send. ' The connection (i.e. session) to the SMTP server remains ' open so that subsequent SendEmail calls may use the ' same connection. success = mailman.SendEmail(email) If (success <> 1) Then Debug.Print mailman.LastErrorText Exit Sub End If success = mailman.CloseSmtpConnection() If (success <> 1) Then Debug.Print "Connection to SMTP server not closed cleanly." End If Debug.Print "Mail Sent!"

Từ khóa » Visual Basic Send Email Office 365