Скачать: CL | DM;

Delphi Учётные записи Ms Outlook   Найти похожие ветки 

← →
Lennyt ©   (2008-10-28 08:06) [0]

как получить адреса smtp, pop3 каждой учетной записи? везде только пишут про контакты, да и про отправку письма... как обратится вот к этим объектам? заранее спасибо

---

← →
Lennyt ©   (2008-10-28 09:16) [1]

может в МСДН ктонить знает где раздел про это

---

← →
Lennyt ©   (2008-10-28 10:23) [2]

вот нашел код, но не работает. говорит "недопустимая строка с указанием класса"  может подключить юнит какойто нада кроме comobj?
var
 OutlookSession, Accounts, Account : OLEVariant;
 AccountCount, i : integer;
begin
 OutlookSession := CreateOleObject("Redemption.RDOSession");
 OutlookSession.Logon("Outlook");
 Accounts  := OutlookSession.Accounts;
 AccountCount := Accounts.Count;
 for i:=1 to AccountCount do begin
    Account:=Accounts.Item(i);
    if Account.AccountType = 0{atPOP3} then begin
       ShowMessage(Account.POP3_Server);
    end;
 end;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.01 c