Модераторы: Akina
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Vb+outlook+cdo.message что надо писать там? 
:(
    Опции темы
justS
Дата 13.4.2010, 21:12 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 3.4.2010

Репутация: нет
Всего: нет



Ситуация:
работаю в банке. почта идет через Exchange сервер. клиент Outlook. посылать на внешнюю почту могу. НО.. почему то если ставить перенаправление почты из Outlook'а то письма не идут. IT служба естественно не чешется ни хрена. А надо пересылать некоторые письма которые приходят уже после окончания рабочего дня на домашний ящик.
соответственно надо сделать макрос чтобы делал новое письмо и посылал.
проблема с обычным способом описанным тут  http://support.microsoft.com/kb/161088:
 Set objOutlookMsg  = objOutlook.CreateItem(olMailItem)
в том что для того чтобы послать требует подтверждения вручную.
без подтверждения возможно через CDO.Message
так вот написана примерна такая фигня:
Код

Sub tst()
 Dim Msg  ' As CDO.Message
 Dim Config ' As CDO.Configuration
 
 ' Create message and configuration objects.
    Set Msg = CreateObject("CDO.Message")
 Set Config = CreateObject("CDO.Configuration")
 
 ' Get the message configuration object.
    Set Config = Msg.Configuration
 
 ' Set the sendusing field to 'cdoSendUsingExchange'.
    Config("http://schemas.microsoft.com/cdo/configuration/sendusing") = 3
 
 ' Set the mailboxurl field to the specified mailbox URL.
    Config("http://schemas.microsoft.com/cdo/configuration/mailboxurl") = "http://сервер/Exchange/ник/"
 
 ' Update the fields.
    Config.Fields.Update

 так вот в дебаге на Update все время говорит:
Fields update failed/ For further information, examine the Status property of individual field object
 
сервер брался из:
Панель управления-почта-учетные записи-свойства MIcrosoft Exchange Server
ник пытался брать и оттуда и то что до собаки в корпоративной почте

поискал по инету - как то особо никто не пишет...
может кто в курсе что конкретно там вообще надо написать чтобы прошло?


Это сообщение отредактировал(а) Akina - 13.4.2010, 22:28
PM MAIL   Вверх
Akina
Дата 13.4.2010, 22:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454




M
Akina
Используйте тег "Код"!


Цитата(justS @  13.4.2010,  22:12 Найти цитируемый пост)
если ставить перенаправление почты из Outlook'а то письма не идут. 

Подробнее плиз.

Цитата(justS @  13.4.2010,  22:12 Найти цитируемый пост)
Config("http://schemas.microsoft.com/cdo/configuration/mailboxurl") = "http://сервер/Exchange/ник/"

Неверно. Сервер - локальный, так что тут должен быть его URI, а не адрес его веб-морды.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
justS
Дата 13.4.2010, 22:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 3.4.2010

Репутация: нет
Всего: нет



Цитата

Цитата(justS @  13.4.2010,  22:12 ) 
если ставить перенаправление почты из Outlook'а то письма не идут.  

Подробнее плиз.


я не знаю как это еще подробнее. не идут и все. в отправленных есть. в принятых нет. на локальные адреса доходят.

Цитата

Цитата(justS @  13.4.2010,  22:12 ) 
Config("http://schemas.microsoft.com/cdo/configuration/mailboxurl") = "http://сервер/Exchange/ник/" 

Неверно. Сервер - локальный, так что тут должен быть его URI, а не адрес его веб-морды.


неверно что? я писал откуда брал сервер. или соответственно вопрос в этом заключался вопрос - как определить URL локальный Exchange сервера. и что там писать надо
PM MAIL   Вверх
Akina
Дата 14.4.2010, 07:35 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата(justS @  13.4.2010,  23:40 Найти цитируемый пост)
как определить URL локальный Exchange сервера

А посмотреть настройки SMTP-аккаунта (сервер. порт, логин) в том же аутлуке типа не судьба?


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
justS
Дата 14.4.2010, 10:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 3
Регистрация: 3.4.2010

Репутация: нет
Всего: нет



так как у вас статус Модератора то я в некотором недоумении
то ли я настолько туплю. то ли вы вообще не читаете что я пишу или не имели дела с Exchange как до этого не имел я
я все написал выше:
у меня в настойках НЕТ данных по SMTP-аккаунту потому что НЕТ как такого SMTP-аккаунта
общение идет через Exchange с которым я раньше не имел никакого дела поэтому не знаю с чем его едят
если туплю я то может вы разъясните где смотреть...
потому что по ВСЕМ настройкам мне нужно идти через учетные записи
PM MAIL   Вверх
Akina
Дата 14.4.2010, 11:00 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Советчик
****


Профиль
Группа: Модератор
Сообщений: 20581
Регистрация: 8.4.2004
Где: Зеленоград

Репутация: 34
Всего: 454



Цитата(justS @  14.4.2010,  11:00 Найти цитируемый пост)
то ли я настолько туплю. то ли вы вообще не читаете что я пишу 

тупите, сударь
Цитата(justS @  14.4.2010,  11:00 Найти цитируемый пост)
у меня в настойках НЕТ данных по SMTP-аккаунту потому что НЕТ как такого SMTP-аккаунта

Значит, настройте, чтобы был. Или обратитесь к админу, чтобы он настроил. При невозможности используйте SMTP-службу внешнего аккаунта, возможно, какого-нить бесплатного типа mail.ru или gmail.com - само собой озаботьтесь, чтобы в системе присутствовал как минимум SimpleMAPI обработчик. 
CDO через службу почты интернета работать не будет ни при каких обстоятельствах.
Информация по настройке коннектора на Exchange Server берётся во встроенной справке сервера или из KB265293. Какие при этом использовать учётные данные - станет очевидным при настройке.
Цитата(justS @  14.4.2010,  11:00 Найти цитируемый пост)
или не имели дела с Exchange

Для того, чтобы разобраться с проблемой, вовсе необязательно быть гуру в объекте. Обычно достаточно просто внимательно читать документацию.


--------------------
 О(б)суждение моих действий - в соответствующей теме, пожалуйста. Или в РМ. И высшая инстанция - Администрация форума.

PM MAIL WWW ICQ Jabber   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "VB6"
Akina

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по VB обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • Используйте теги [code=vb][/code] для подсветки кода. Используйтe чекбокс "транслит" (возле кнопок кодов) если у Вас нет русских шрифтов.


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Akina.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | VB6 | Следующая тема »


 




[ Время генерации скрипта: 0.0512 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.