powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Заполнить CDO.Configuration из профиля по умолчанию на компе
3 сообщений из 3, страница 1 из 1
Заполнить CDO.Configuration из профиля по умолчанию на компе
    #34168527
Фотография nibbles
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Настройки для CDO.Configuration заполняются следующим образом (к примеру):

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
Set objMessage = New CDO.Message
Set objConfig = New CDO.Configuration

With objConfig
    .Fields(cdoSendUsingMethod) = cdoSendUsingPort
    .Fields(cdoSMTPServer) = objMail.SMTPServer    ' IP-адрес почтового сервера'
    .Fields(cdoSMTPServerPort) = CInt(objMail.SMTPServerPort) ' SMTP порт (обычно 25)'
    .Fields(cdoSMTPConnectionTimeout) = CInt(objMail.SMTPServerTimeout)
    .Fields(cdoSMTPAccountName) = objMail.MailUserAccountName 'имя пользователя'
    .Fields(cdoSMTPAuthenticate) = cdoBasic
    .Fields(cdoSendUserName) = objMail.MailUserName 'имя при входе в почтовик'
    .Fields(cdoSendPassword) = objMail.MailUserPassword 'пароль'
    .Fields.Update
End With

А хочется, чтобы было что-то вроде

Код: plaintext
1.
2.
3.
4.
Set objMessage = New CDO.Message
Set objConfig = New CDO.Configuration
' хз, как называется это свойство и есть ли оно вообще... (или метод, или другой способ)
objConfig.ProflieName = "Работа с MS Exchange"

Понятно, да? Считать настройки из профиля, чтобы лишний раз не спрашивать об этом пользователя... ибо задолбало... а я - толстый и ленивый
...
Рейтинг: 0 / 0
Заполнить CDO.Configuration из профиля по умолчанию на компе
    #34169147
Фотография orunbek
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А если хранить эти настройки где нибудь в реестре или в ini-файле,
раз спросил пользователя, сохранил потом далее, использовать уже сохраненные настройки
...
Рейтинг: 0 / 0
Заполнить CDO.Configuration из профиля по умолчанию на компе
    #34169342
Фотография nibbles
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
orunbekА если хранить эти настройки где нибудь в реестре или в ini-файле,
вообще-то они и так там хранятся :)) вопрос в том, как "поднять" их оттуда одним оператором, а не каждый по-отдельности выковыривать.

У объекта класса CDO.Configuration есть метод Load, у которого есть параметры cdoDefault, cdoDirectory, cdoOutlookExpress, cdoКакойТоТамЕще. Я предположил, что именно он поднимает настройки из реестра. Но его применение не принесло результата с любым из этих параметров.

orunbekраз спросил пользователя, сохранил потом далее, использовать уже сохраненные настройки

Для немногочисленых пользователей с "внешней" почтой (mail.ru, inbox.ru) так и делается, но для корпоративных пользователей MS Exchange (которых несколько сотен) это бессмысленно, т.к. они в большинстве своем не знают, как называется сервер, какой порт... мало кто знает даже какое у него имя при входе в почтовик, которое не всегда совпадает с NTDomenUserName :))
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Заполнить CDO.Configuration из профиля по умолчанию на компе
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]