Accesso a datos de Exchange
 

Hola a todos, Bueno hoy me encuentro trabajando, el bendito Exchange, necesito acceder los datos de la agenda y otros, (ya que el exchange(server) lo soporta).
Como nexo de conexion estoy utilizando el MAPI_TLB (HelpString: Microsoft CDO 1.21 Library, Version: 1.21).
He podido loguearme, obtener el nombre del usuario actual, EL ID..
le nombre de algonos stores pero no puedo acceder al Inbox ni a ninguna carpeta..
Aqui pongo el coodigo que me funciona..

Código Delphi [-]
   Var
        login :Session;
        a:variant;
        i,b:integer;
   begin
      login:=CoSession.Create;
      a:='zafiro'+#10+'scalello'; //servidor exchange (ip o nombre) Usuario
      login.Logon('','',false,true,0,false,a);
      memo1.lines.add(string(login.CurrentUser));  //Nombre de usuario
      memo1.lines.add(string(login.Session));  // Valor de la Sesion
      for i:=1 to login.InfoStores.Count do    // levanto la cantidad de Stores que tiene
         begin
            memo1.lines.add(login.InfoStores.Item[i].name); //muestra el valor de Store
                                                            //Puede ser Carpetas publias o la carpeta privada
            memo1.lines.add(login.InfoStores.Item[i].ID);   //ID de la Carpeta
            login.InfoStores.item[i].fields;                //Encuentra los fields
            Try
               for b:=1 to login.InfoStores.item[i].fields.count do // da error, existe el .Count
                                                                    // pero me tira un error
                  memo1.lines.add(login.InfoStores.item[i].fields[b].name);
            except
            end;
         end;

el mensaje de error que me da es el siguiente

enviar la librerias MAPI
 

Bunos dias,

Me podrias enviar la librerias MAPI?
Me gustaria trabajar con el Exchange desde Delphi!
Gracias!

Mapi_tlb
 

locotenentul aca te paso los tlb.. lo que si no te olvides que tenes que tener instalado un servidor de exchange para poder usarlas.!!! saludos

importante!! los archivos Son .RAR
Renombrar la extencion ZIP por RAR
Saludos

*-*-*-*-*- Volvi a subir los archivos porque estaban mal!! *--*-*-*-*-*

gracias
 

Gracias,lo siento darte las gracias tan tarde, acabo de ver la contestacion tuya.
Saludos,
Locotenentul

no va
 

Me has mandado el mismo fichero dos veces.No puedo descomprimir el archivo porque falta el volumen uno.El volumen mandado dos veces es el dos.
Me lo podiras enviar el fichero pas en un solo archivo comprimido?Asi evitariamos problemas.
Gracias,
Locotenentul