Club Builder

[adrianguillen]

Necesito desarrollar un sistema con una base de datos para registrar datos de peticiones que mis clientes me hagan.

Los nombres de los clientes y algunos datos, como su mail, necesito que el sistema los recupere del Outlook, que a su ves está sincronizado con el maestro de usuarios de la empresa.

¿Alguien me puede decir si es posible que mi sistema lea la libreta de direcciones de outlook y en todo caso, como se puede hacer?

Gracias!!!![/b]

[vrodriguez]

Hola a todos,

buscando y buscando, algo sobre este tema y no encuentro nada de lo que realmente necesito saber.

La idea es leer y/o escribir desde mi programa la libreta de contactos del outlook, sin tener qu importar/exportar estos contacto.

Supongo que desde la fecha de este articulo, ya alguien tendra la misma duda y claro espero que este clarificada.

Att
Vrodriguez

[vrodriguez]

Creo que solucione mi problema, encontre en una página lo siguiente con una pequeña modificación para que funcione:


#include<memory>
#include<IniFiles>

Variant Outlook = CreateOleObject( "Outlook.Application" );
Variant MAPINamespace = Outlook.OleFunction( "GetNamespace", "MAPI" );
Variant contactsFolder = MAPINamespace.OleFunction( "GetDefaultFolder", olFolderContacts );
Variant contactItems = contactsFolder.OlePropertyGet( "Items" );
Variant contactItemsCount = contactItems.OlePropertyGet( "Count" );

String Contacto, Celular, Email;

for( int i = 1; i <= contactItemsCount; i++ )
{
Variant contactItem = contactItems.OleFunction( "Item", i );

Contacto = contactItem.OlePropertyGet( "FullName" ) ;
Celular = contactItem.OlePropertyGet( "MobileTelephoneNumber" );
Email = Contacto + contactItem.OlePropertyGet( "Email1Address" );
}


Además, encontre "en la misma página" los valores para ...PropertyGet...
Adjunto el detalle de estos:

Title
FirstName
MiddleName
LastName
Suffix
FullName
CompanyName
Department
JobTitle
BusinessAddressStreet
BusinessAddressCity
BusinessAddressState
BusinessAddressPostalCode
BusinessAddress
BusinessAddressCountry
HomeAddressStreet
HomeAddressCity
HomeAddressState
HomeAddressPostalCode
HomeAddress
HomeAddressCountry
OtherAddressStreet
OtherAddressCity
OtherAddressState
OtherAddressPostalCode
OtherAddress
OtherAddressCountry
AssistantTelephoneNumber
BusinessTelephoneNumber
Business2TelephoneNumber
BusinessFaxNumber
CallbackTelephoneNumber
CarTelephoneNumber
CompanyMainTelephoneNumber
HomeFaxNumber
HomeTelephoneNumber
Home2TelephoneNumber
ISDNNumber
MobileTelephoneNumber
OtherFaxNumber
OtherTelephoneNumber
PagerNumber
PrimaryTelephoneNumber
RadioTelephoneNumber
TTYTDDTelephoneNumber
TelexNumber
Account
Anniversary
AssistantName
BillingInformation
Birthday
BusinessAddressPostOfficeBox
Categories
Children
Email1Address
Email1AddressType
Email1DisplayName
Email2Address
Email2AddressType
Email2DisplayName
Email3Address
Email3AddressType
Email3DisplayName
Gender //Unspecified=0, Female=1, Male=2
GovernmentIDNumber
Hobby
HomeAddressPostOfficeBox
Initials
InternetFreeBusyAddress
Language
ManagerName
Mileage
OfficeLocation
OrganizationalIDNumber
OtherAddressPostOfficeBox
Importance //Priority: Low=0, Normal=1, High=2
Profession
ReferredBy
Sensitivity //Private: Normal=0, Personal=1, Private=2, Confidential=3
Spouse
User1
User2
User3
User4
WebPage

Cheque varios y funciona 100%.

Att,