Como criar um contato com o ADO e o provedor ExOLEDB usando translation from VPE for Csharp Visual

using System;

namespace Samples
{
	class Class1
	{
		static void Main(string[] args)
		{
			try 
			{
                        // TODO: Replace with your item URL
			string sURL = "http:/<ExchServer>/Exchange/<UserAlias>/Contacts/Test.eml";
 			
			ADODB.Connection oCn = new ADODB.Connection();
			ADODB.Record oRc = new ADODB.Record();
			ADODB.Fields oFields;

			oCn.Provider = "exoledb.datasource";

			oCn.Open(sURL, "", "", 0);  
			if(oCn.State == 1)
			{
				Console.WriteLine("Connection Successful");
			}
			else
			{
				Console.WriteLine("Connection Unsuccessful");
				return;
			}			
			
			oRc.Open(sURL, oCn, 
				ADODB.ConnectModeEnum.adModeReadWrite, 
				ADODB.RecordCreateOptionsEnum.adCreateNonCollection,
				ADODB.RecordOpenOptionsEnum.adOpenRecordUnspecified,
				"", "");
			
			oFields = oRc.Fields;

			oFields["DAV:contentclass"].Value = "urn:content-classes:person";
			oFields["http://schemas.microsoft.com/exchange/outlookmessageclass"].Value = "IPM.Contact";
			oFields["urn:schemas:contacts:cn"].Value = "David Jones";
			oFields["urn:schemas:contacts:nickname"].Value = "Dave";
			oFields["urn:schemas:contacts:title"].Value = "Engineer";
			oFields["urn:schemas:contacts:department"].Value = "Department Name";
			oFields["urn:schemas:contacts:email1"].Value = "someone@example.com";

			
			oFields.Update();


			oCn = null;
			oRc = null;
			oFields = null;
			}
			catch (Exception e)
			{
				Console.WriteLine("{0} Exception caught.", e);
			}			
		}
        }
}