PDA

Ver la Versión Completa : Accesso a datos de Exchange


Enan0
01-09-2005, 20:25:30
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..

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

' [Collaboration Data Objects - [E_INVALIDARG(80070057)]]'

locotenentul
06-09-2005, 15:46:57
Bunos dias,

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

Enan0
12-09-2005, 15:36:29
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!! *--*-*-*-*-*

locotenentul
04-10-2005, 14:37:15
Gracias,lo siento darte las gracias tan tarde, acabo de ver la contestacion tuya.
Saludos,
Locotenentul

locotenentul
04-10-2005, 14:46:21
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