Create contact

The following example shows you how to create new contact. Contact will be created in Contacts folder inside user's mailbox.

C# example

using System;
using System.Net;
using Independentsoft.Webdav.Exchange;
using Independentsoft.Webdav.Exchange.ContentClass;

namespace Sample
{
    class Program
    {
        static void Main(string[] args)
        {
            NetworkCredential credential = new NetworkCredential("username", "password");
            WebdavSession session = new WebdavSession(credential);
            session.UserMailbox = "https://myserver/exchange/emailaddress";

            Resource resource = new Resource(session);
            Mailbox myMailbox = resource.Mailbox;

            Contact contact1 = new Contact();
            contact1.GivenName = "John Smith";
            contact1.Subject = "John Smith";
            contact1.FileAs = "John Smith";
            contact1.Organization = "Independentsoft";
            contact1.Email1 = "john@independentsoft.de";
            contact1.Department = "Development";
            contact1.TelephoneNumber = "555-666-777";

            MultiStatus multiStatus = resource.CreateItem(contact1);
            string contactUrl = multiStatus.Response[0].HRef;

            Console.WriteLine("Url of just created contact = " + contactUrl);
            Console.WriteLine("Press ENTER to exit");
            Console.Read();
        }
    }
}

VB example

Imports System
Imports System.Net
Imports Independentsoft.Webdav.Exchange
Imports Independentsoft.Webdav.Exchange.ContentClass

Module Module1
    Sub Main(ByVal args() As String)

        Dim credential As NetworkCredential = New NetworkCredential("username", "password")
        Dim session As WebdavSession = New WebdavSession(credential)
        session.UserMailbox = "https://myserver/exchange/emailaddress"

        Dim resource As Resource = New Resource(session)
        Dim myMailbox As Mailbox = resource.Mailbox

        Dim contact1 As Contact = New Contact
        contact1.GivenName = "John Smith"
        contact1.Subject = "John Smith"
        contact1.FileAs = "John Smith"
        contact1.Organization = "Independentsoft"
        contact1.Email1 = "john@independentsoft.de"
        contact1.Department = "Development"
        contact1.TelephoneNumber = "555-666-777"

        Dim multiStatus As MultiStatus = resource.CreateItem(contact1)
        Dim contactUrl As String = multiStatus.Response(0).HRef

        Console.WriteLine("Url of just created contact = " & contactUrl)
        Console.WriteLine("Press ENTER to exit")
        Console.Read()

    End Sub
End Module

Independentsoft - any library, any programming language

WebDAV .NET for Exchange > Tutorial > Create contact