Send message with an attachment

The following example shows you how to create a draft message, add an attachment and send the message.

C# example

using System;
using System.Threading.Tasks;
using Independentsoft.Graph;
using Independentsoft.Graph.Mails;
using Independentsoft.Graph.Users;

namespace Sample
{
    class Program
    {
        static async Task Main(string[] args)
        {
            try
            {
                GraphClient client = new GraphClient();

                client.ClientId = "63333333-209e-454e-b7bd-55a4d201270f";
                client.Tenant = "independentsoft.onmicrosoft.com";
                client.ClientSecret = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx";

                Message message = new Message();
                message.Subject = "Test message";
                message.Body = new ItemBody("<html><body>Message body</body></html>", ContentType.Html);
                message.ToRecipients.Add(new EmailAddress("elon@independentsoft.com"));
                message.ToRecipients.Add(new EmailAddress("pia@independentsoft.com"));

                Message createdMessage = await client.CreateMessage(message, new UserId("info@independentsoft.onmicrosoft.com"));

                FileAttachment fileAttachment = new FileAttachment("e:\\document.docx");

                Attachment createdAttachment = await client.CreateAttachment(fileAttachment, new MessageId(createdMessage.Id), new UserId("info@independentsoft.onmicrosoft.com"));

                await client.SendMessage(createdMessage.Id, new UserId("info@independentsoft.onmicrosoft.com"));
            }
            catch (GraphException ex)
            {
                Console.WriteLine("Error: " + ex.Code);
                Console.WriteLine("Message: " + ex.Message);
                Console.Read();
            }
        }
    }
}

VB example

Imports System.IO
Imports Independentsoft.Graph
Imports Independentsoft.Graph.Users
Imports Independentsoft.Graph.Mails

Namespace Sample
    Class Module1
        Shared Sub Main(ByVal args As String())

            Dim task = New Task(AddressOf Run)

            ' Start and wait for task to end.
            task.Start()
            Console.Read()

        End Sub

        Shared Async Sub Run()
            Try

                Dim client As GraphClient = New GraphClient()

                client.ClientId = "63333333-209e-454e-b7bd-55a4d201270f"
                client.Tenant = "independentsoft.onmicrosoft.com"
                client.ClientSecret = "xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx"

                Dim message As Message = New Message()

                message.Subject = "Test message"
                message.Body = New ItemBody("<html><body>Message body</body></html>", ContentType.Html)
                message.ToRecipients.Add(New EmailAddress("elon@independentsoft.com"))
                message.ToRecipients.Add(New EmailAddress("pia@independentsoft.com"))

                Dim createdMessage As Message = Await client.CreateMessage(message, new UserId("info@independentsoft.onmicrosoft.com"))

                Dim fileAttachment As FileAttachment = New FileAttachment("e:\document.docx")

                Dim createdAttachment As Attachment = Await client.CreateAttachment(fileAttachment, New MessageId(createdMessage.Id), New UserId("info@independentsoft.onmicrosoft.com"))

                Await client.SendMessage(createdMessage.Id, New UserId("info@independentsoft.onmicrosoft.com"))

            Catch ex As GraphException
                Console.WriteLine("Error: " + ex.Code)
                Console.WriteLine("Error: " + ex.Message)
                Console.Read()
            End Try
        End Sub

    End Class
End Namespace

Independentsoft - any library, any programming language

Graph .NET > Tutorial > Send message with an attachment

Need help? Ask our developers: