![]() |
Chilkat HOME Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi DLL Go Java Node.js Objective-C PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual FoxPro) Outlook Send EmailSee more Outlook ExamplesThis example sends a simple plain-text email. Other examples exist for:
Note: This example requires Chilkat v11.0.0 or greater.
LOCAL lnSuccess LOCAL loHttp LOCAL loJsonToken LOCAL loJson LOCAL loResp lnSuccess = 0 * This example requires the Chilkat API to have been previously unlocked. * See Global Unlock Sample for sample code. loHttp = CreateObject('Chilkat.Http') * Use your previously obtained access token here: * See the following examples for getting an access token: * Get Microsoft Graph OAuth2 Access Token (Azure AD v2.0 Endpoint). * Get Microsoft Graph OAuth2 Access Token (Azure AD Endpoint). * Refresh Access Token (Azure AD v2.0 Endpoint). * Refresh Access Token (Azure AD Endpoint). loJsonToken = CreateObject('Chilkat.JsonObject') lnSuccess = loJsonToken.LoadFile("qa_data/tokens/microsoftGraph.json") IF (lnSuccess = 0) THEN ? loJsonToken.LastErrorText RELEASE loHttp RELEASE loJsonToken CANCEL ENDIF loHttp.AuthToken = loJsonToken.StringOf("access_token") * To send email, we'll POST to the following endpoint: * * POST /users/{id | userPrincipalName}/sendMail * * (The special keyword "me" may be used in place of a principal name.) * * The body of the POST request contains JSON that specifies the email subject, body, * recipients, etc. This example will build the following JSON email: * * { * "message": { * "subject": "Meet for lunch?", * "body": { * "contentType": "Text", * "content": "The new cafeteria is open." * }, * "toRecipients": [ * { * "emailAddress": { * "name": "Chilkat Software", * "address": "admin@chilkat.io" * } * }, * { * "emailAddress": { * "address": "chilkat.support@gmail.com" * } * } * ], * "ccRecipients": [ * { * "emailAddress": { * "name": "Chilkat Blog", * "address": "admin@cknotes.com" * } * } * ] * }, * "saveToSentItems": true * } * * Build the above JSON. loJson = CreateObject('Chilkat.JsonObject') loJson.UpdateString("message.subject","Meet for lunch?") loJson.UpdateString("message.body.contentType","Text") loJson.UpdateString("message.body.content","The new cafeteria is open.") loJson.UpdateString("message.toRecipients[0].emailAddress.name","Chilkat Software") loJson.UpdateString("message.toRecipients[0].emailAddress.address","admin@chilkat.io") loJson.UpdateString("message.toRecipients[1].emailAddress.address","chilkat.support@gmail.com") loJson.UpdateString("message.ccRecipients[0].emailAddress.name","Chilkat Blog") loJson.UpdateString("message.ccRecipients[0].emailAddress.address","admin@cknotes.com") loJson.UpdateBool("saveToSentItems",1) * Send the HTTP POST (i.e. send the email) loResp = CreateObject('Chilkat.HttpResponse') lnSuccess = loHttp.HttpJson("POST","https://graph.microsoft.com/v1.0/me/sendMail",loJson,"application/json",loResp) IF (lnSuccess = 0) THEN ? loHttp.LastErrorText RELEASE loHttp RELEASE loJsonToken RELEASE loJson RELEASE loResp CANCEL ENDIF * The send succeeded if the response status code = 202. * In the success case, there is no response body. (We just get the response code to know that it succeeded.) IF (loResp.StatusCode <> 202) THEN loJson.Load(loResp.BodyStr) loJson.EmitCompact = 0 ? loJson.Emit() ? "Failed, response status code = " + STR(loResp.StatusCode) ELSE ? "Outlook Mail Sent." ENDIF RELEASE loHttp RELEASE loJsonToken RELEASE loJson RELEASE loResp |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.