|
Отправка писем из 1с 8.2, через прокси. | ☑ | ||
---|---|---|---|---|
0
байт
10.12.14
✎
12:08
|
Коллеги всем привет, формирую отправку письма следующим кодом, если отправлять ч/з прямой доступ к интернету, письмо уходит без проблем ч/з прокси выходит ошибка "Произошла исключительная ситуация (CDO.Message.1): Транспорту не удалось подключиться к серверу.". Каким образом прописать настройки прокси в нижеуказанном коде?
cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword"; cdoSendEmailAddress = "http://schemas.microsoft.com/cdo/configuration/sendemailaddress"; cdoAutoPromoteBodyParts = "http://schemas.microsoft.com/cdo/configuration/autopromotebodyparts" ; cdoFlushBuffersOnWrite = "http://schemas.microsoft.com/cdo/configuration/flushbufferson;write" ; cdoHTTPCookies = "http://schemas.microsoft.com/cdo/configuration/httpcookies" ; cdoLanguageCode = "http://schemas.microsoft.com/cdo/configuration/languagecode" ; cdoNNTPAccountName = "http://schemas.microsoft.com/cdo/configuration/nntpaccountname" ; cdoNNTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/nntpauthenticate" ; cdoNNTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/nntpconnectiontimeout" ; cdoNNTPServer = "http://schemas.microsoft.com/cdo/configuration/nntpserver" ; cdoNNTPServerPickupDirectory = "http://schemas.microsoft.com/cdo/configuration/nntpserverpickupdirectory" ; cdoNNTPServerPort = "http://schemas.microsoft.com/cdo/configuration/nntpserverport" ; cdoNNTPUseSSL = "http://schemas.microsoft.com/cdo/configuration/nntpusessl" ; cdoPostEmailAddress = "http://schemas.microsoft.com/cdo/configuration/postemailaddress" ; cdoPostPassword = "http://schemas.microsoft.com/cdo/configuration/postpassword" ; cdoPostUserName = "http://schemas.microsoft.com/cdo/configuration/postusername" ; cdoPostUserReplyEmailAddress = "http://schemas.microsoft.com/cdo/configuration/postuserreplyemailaddress" ; cdoPostUsingMethod = "http://schemas.microsoft.com/cdo/configuration/postusing" ; cdoSaveSentItems = "http://schemas.microsoft.com/cdo/configuration/savesentitems" ; cdoSendEmailAddress = "http://schemas.microsoft.com/cdo/configuration/sendemailaddress" ; cdoSendPassword = "http://schemas.microsoft.com/cdo/configuration/sendpassword" ; cdoSendUserName = "http://schemas.microsoft.com/cdo/configuration/sendusername" ; cdoSendUserReplyEmailAddress = "http://schemas.microsoft.com/cdo/configuration/senduserreplyemailaddress" ; cdoSendUsingMethod = "http://schemas.microsoft.com/cdo/configuration/sendusing" ; cdoSMTPAccountName = "http://schemas.microsoft.com/cdo/configuration/smtpaccountname" ; cdoSMTPAuthenticate = "http://schemas.microsoft.com/cdo/configuration/smtpauthenticate" ; cdoSMTPConnectionTimeout = "http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout" ; cdoSMTPServer = "http://schemas.microsoft.com/cdo/configuration/smtpserver"; cdoSMTPServerPickupDirectory = "http://schemas.microsoft.com/cdo/configuration/smtpserverpickupdirectory"; cdoSMTPServerPort = "http://schemas.microsoft.com/cdo/configuration/smtpserverport"; cdoSMTPUseSSL = "http://schemas.microsoft.com/cdo/configuration/smtpusessl"; cdoURLGetLatestVersion = "http://schemas.microsoft.com/cdo/configuration/urlgetlatestversion"; cdoURLProxyBypass = "http://schemas.microsoft.com/cdo/configuration/urlproxybypass"; cdoURLProxyServer = "http://schemas.microsoft.com/cdo/configuration/urlproxyserver"; cdoUseMessageResponseText = "http://schemas.microsoft.com/cdo/configuration/usemessageresponsetext"; Notification = "urn:schemas:mailheader:disposition-notification-to"; Receipt = "urn:schemas:mailheader:return-receipt-to"; cdoDSNDefault = 0; // No DSN commands are issued. cdoDSNNever = 1; // No DSN commands are issued. cdoDSNFailure = 2; // Return a DSN if delivery fails. cdoDSNSuccess = 4; // Return a DSN if delivery succeeds. cdoDSNDelay = 8; // Return a DSN if delivery is delayed. cdoDSNSuccessFailOrDelay = 14;// Return a DSN if delivery succeeds, fails, or is delayed. sFrom = "От кого"; iConf = Новый COMObject("CDO.Configuration"); iConf.fields(cdoSMTPServer).value = "smtp.gmail.com"; iConf.fields(cdoSMTPServerPort).value = "465"; iConf.fields(cdoSMTPAuthenticate).value = 1; iConf.fields(cdoSendUserName).value = "почта@gmail.com"; iConf.fields(CdoSendPassword).value = "пароль"; iConf.fields(cdoSendEmailAddress).value = "<почта@gmail.com>"; iConf.fields(cdoSMTPUseSSL).value = 1; iConf.fields(cdoSendUsingMethod).value = 2; iConf.fields.update(); //iMsg=createObject("CDO.Message"); iMsg = Новый COMObject("CDO.Message"); //iMsg = NewObject("CDO.Message"); iMsg.configuration = iConf; iMsg.fields(Notification).value = "<smtp.gmail.com>"; iMsg.fields(Receipt).value = "<smtp.gmail.com>"; iMsg.Fields.Update(); //_Получатели = ""; iMsg.to="получатель@matrixufa.ru";//АдресПолучатель; iMsg.subject="ЗапросПоследнегоДокумента"; //"ТемаПисьма"; //iMsg.textBody=?(ФорматТекста=Перечисления.ФорматТекста.HTML, ЭлементыФормы.ПолеHTMLДокумента.ПолучитьТекст(), ТекстПисьма); iMsg.textBody="ДатаНачала " + ДатаНачала + Символы.ПС + "ДатаКонца " + ДатаКонца; iMsg.textBodypart.charset="windows-1251"; // "windows-1251"; iMsg.send(); |
|||
1
sapphire
10.12.14
✎
12:18
|
(0) CDO устаревший инструмент.
Используйте EWS API: http://msdn.microsoft.com/ru-ru/library/dn592140(v=exchg.150).aspx |
|||
2
ДенисЧ
10.12.14
✎
12:33
|
Прокси для почты? Давно такого не слыхал...
|
|||
3
sapphire
10.12.14
✎
12:47
|
(0)
iConf.fields(cdoURLProxyServer).Value = "server:80" iConf.fields.(cdoURLProxyBypass).Value = "<local>" iConf.fields.(cdoURLGetLatestVersion).Value = True |
|||
4
байт
10.12.14
✎
15:28
|
Попробовал отправить почту, отправляет, но прочитать письма не удается пишет что "Данная операция не может быть выполнена, не установлено соединение IMAP.", вставляю протокол подключения imap, выскакивает ошибка: "Certificate failure for ***.***.*.***: Self-signed certificate or untrusted authority: C=RU, O=Universal-Treiding, CN=post.matrixufa.ru", код такой:
Отправитель = "почта@*****.ru"; Пользователь = "почта"; Сервак = "***.***.*.***"; Пароль = "***"; мПрофиль = Новый ИнтернетПочтовыйПрофиль; мПрофиль.АдресСервераIMAP = Сервак; мПрофиль.АдресСервераSMTP = Сервак; мПрофиль.АдресСервераPOP3 = Сервак; мПрофиль.ПортPOP3 = 110; мПрофиль.ПортSMTP = 25; мПрофиль.ПортIMAP = 143; мПрофиль.POP3ПередSMTP=ложь; мПрофиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная; мПрофиль.АутентификацияSMTP = СпособSMTPАутентификации.Login; мПрофиль.ПользовательIMAP = Пользователь; мПрофиль.ПользовательSMTP = Пользователь; мПрофиль.Пользователь = Пользователь; мПрофиль.Пароль = Пароль; мПрофиль.ПарольIMAP = Пароль; мПрофиль.ПарольSMTP = Пароль; мПрофиль.ВремяОжидания = 20; мПрофиль.ИспользоватьSSLIMAP = Истина; мПочта = Новый ИнтернетПочта; Попытка мПочта.Подключиться(мПрофиль,ПротоколИнтернетПочты.IMAP); Исключение |
|||
5
байт
10.12.14
✎
15:31
|
кто-нибудь сталкивался с подобным?
|
|||
6
Йохохо
10.12.14
✎
15:36
|
(5) а если скачать сертификат и установить?
|
|||
7
байт
11.12.14
✎
08:40
|
(6) админ говорит это не поможет, советует в обработке прописать скачку сертификата с сервера сам сертификат самоподписанный.
|
|||
8
shuhard
11.12.14
✎
09:45
|
(5) не занимайся хернёй - почтовые протоколы не работают через прокси
|
|||
9
байт
11.12.14
✎
10:05
|
(8) ключевая ошибка такая:Certificate failure for ***.***.*.***: Self-signed certificate or untrusted authority: C=RU, O=Universal-Treiding, CN=post.matrixufa.ru", ранее все считывалось без проблем как ее решить понятия не имею.
|
|||
10
Йохохо
11.12.14
✎
10:06
|
(9) скачать и добавить в список доверенных
|
|||
11
байт
11.12.14
✎
10:06
|
+(9) скажем так с таким впервые сталкиваюсь поэтому куда копать и как реализовать не знаю.
|
|||
12
байт
11.12.14
✎
10:09
|
(10) есть возможность установить сертификат, добавил в довверенные зоны не помогло.
|
|||
13
kobzon2
11.12.14
✎
10:13
|
Извиняюсь, а для обновление 1с 8. через прокси, какой порт должен быть открыт?
|
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |