Форум: "Основная";
Текущий архив: 2009.11.15;
Скачать: [xml.tar.bz2];
Вниз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 вся ветка
Форум: "Основная";
Текущий архив: 2009.11.15;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.004 c