åbne Outlook's adressekartotek

Outlook Express?

outlook expres og outlook 2000

Hmmm. I Outlook express gemmes disse informationer i *.wab filen. i Outlook gemmes de i *.pst filen.

Er det programmet du vil kalde eller kun hente data?

http://www.scalabium.com/faq/dc_tips.htm

Stoney

ønsker at kalde begge adressekartotek, alt efter hvad for et Outlook der er configureret som standard, hvis man har begge systemer installeret.

Fy ha - det lyder lidt som om du er ved at lave en orm ;)

stoney:

har lige kigget på eksemplet, hvad er intMapisession?
får en fejl på den.

Det er vist et sessions nr.


procedure TForm1.Button1Click(Sender: TObject);
var
  lpRecip: TMapiRecipDesc;
  intRecips: ULONG;
  lpRecips: PMapiRecipDesc;
  i: Integer;
  intMAPISession : Integer;
begin
intMAPISession := 0;
  if (MAPIAddress(intMAPISession, 0, 'Select the recipients', 4, '', 0, lpRecip, 0, 0, @intRecips, lpRecips) = SUCCESS_SUCCESS) then
  begin
    for i := 0 to intRecips-1 do
      listbox1.Items.Add(PMapiRecipDesc(PChar(lpRecips) + i*SizeOf(TMapiRecipDesc))^.lpszAddress);
    MAPIFreeBuffer(lpRecips)
  end;
end;

Stoney

Hov det gik lidt stærkt.

Han beskriver det nederst på siden efter hans eks.
Det eks. jeg postede virker.

Stoney

det virker ikke hos mig får en fejlmelding på intmapisession

har fået det til at virke, jeg kører d5 hvor der ingen mapi.pas.
jeg har kopieret den ind fra d6.

kan man ikke bruge en edit istedet for en listbox.

ups har fundet ud af det

edit1.text:=(PMapiRecipDesc(PChar(lpRecips) + i*SizeOf(TMapiRecipDesc))

smid lige et svar stoney!

-:)

Stoney