Independentsoft
- any library, any programming language
Home
Purchase
Support
Company
Contact
Graph .NET
>
Tutorial
> Create contact
The following example shows you how to create a new contact.
C# example
using System; using System.Threading.Tasks; using Independentsoft.Graph; using Independentsoft.Graph.Contacts; namespace Sample { class Program { static async Task Main(string[] args) { try { GraphClient client = new GraphClient(); client.ClientId = "67cb3333-209e-454e-b7bd-55a4d201270f"; client.Tenant = "independentsoft.onmicrosoft.com"; client.Username = "info@independentsoft.onmicrosoft.com"; client.Password = "password"; Contact contact = new Contact(); contact.DisplayName = "Alice Smith"; contact.GivenName = "Alice"; contact.Surname = "Smith"; contact.Title = "Dr"; contact.JobTitle = "Software developer"; contact.OfficeLocation = "Berlin"; contact.EmailAddresses.Add(new EmailAddress("alice@independentsoft.onmicrosoft.com")); contact.Phones.Add(new Phone("555-666-777", PhoneType.Business)); contact.Phones.Add(new Phone("555-111-777", PhoneType.Mobile)); Contact createdContact = await client.CreateContact(contact); Console.WriteLine("Id = " + createdContact.Id); Console.Read(); } catch (GraphException ex) { Console.WriteLine("Error: " + ex.Code); Console.WriteLine("Message: " + ex.Message); Console.Read(); } } } }
VB example
Imports Independentsoft.Graph Imports Independentsoft.Graph.Contacts 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 = "67cb3333-209e-454e-b7bd-55a4d201270f" client.Tenant = "independentsoft.onmicrosoft.com" client.Username = "info@independentsoft.onmicrosoft.com" client.Password = "password" Dim contact As Contact = New Contact() contact.DisplayName = "Alice Smith" contact.GivenName = "Alice" contact.Surname = "Smith" contact.Title = "Dr" contact.JobTitle = "Software developer" contact.OfficeLocation = "Berlin" contact.EmailAddresses.Add(New EmailAddress("alice@independentsoft.onmicrosoft.com")) contact.Phones.Add(New Phone("555-666-777", PhoneType.Business)) contact.Phones.Add(New Phone("555-111-777", PhoneType.Mobile)) Dim createdContact As Contact = Await client.CreateContact(contact) Console.WriteLine("Id = " & createdContact.Id) Catch ex As GraphException Console.WriteLine("Error: " + ex.Code) Console.WriteLine("Error: " + ex.Message) Console.Read() End Try End Sub End Class End Namespace
Need help? Ask our developers:
Name*
Email*
Message*