|
Корректная отправка чека в СБИС после печати бумажного чека | ☑ | ||
|---|---|---|---|---|
|
0
RomarioLQ
16.08.23
✎
12:43
|
Приветствую, коллеги! Такая проблема. Написал обработку для рассылки расчетных листков. Пытаюсь соединиться, и нифига не соединяется. Что может быть? Код
Профиль = Новый ИнтернетПочтовыйПрофиль; АдресОтправителя = "логин@почта"; ЛогинОтправителя = "логин@почта"; ПарольПочтовогоЯщика = "пароль"; АдресPOPСервера = "255.255.255.25";(корректный адрес тут) АдресSMTPСервера = "255.255.255.25"; ПортPOPСервера = Справочники.осиПредопределенныеЭлементы.ПортPOPСервера.Значение; ПортSMTPСервера = Справочники.осиПредопределенныеЭлементы.ПортSMTPСервера.Значение; ВремяОжидания = Справочники.осиПредопределенныеЭлементы.ВремяОжиданияСервера.Значение; АдресIMAPСервера = "255.255.255.25"; //Заполним параметры POP3 сервера Профиль.АдресСервераPOP3 = АдресPOPСервера; Профиль.ПортPOP3 = "110"; Профиль.АутентификацияPOP3 = СпособPOP3Аутентификации.Обычная; Профиль.Пароль = ПарольПочтовогоЯщика; Профиль.Пользователь = АдресОтправителя; Профиль.ТолькоЗащищеннаяАутентификацияSMTP = Ложь; Профиль.ПользовательIMAP = "логин@почта"; Профиль.ПарольIMAP = "Пароль"; Профиль.АдресСервераIMAP = АдресIMAPСервера; //Заполним параметры SMTP сервера Профиль.АдресСервераSMTP = АдресSMTPСервера; Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию; Профиль.ПользовательSMTP = ЛогинОтправителя; Профиль.ПарольSMTP = ПарольПочтовогоЯщика; Профиль.ПортSMTP = ПортSMTPСервера;//; Профиль.ИспользоватьSSLSMTP = Ложь; //Истина Профиль.ИспользоватьSSLPOP3 = Ложь; //Истина Если вхУчетнаяЗапись.ИспользоватьЗащищенноеСоединениеДляИсходящейПочты Тогда Профиль.ИспользоватьSSLSMTP = Истина; КонецЕсли; Если вхУчетнаяЗапись.ИспользоватьЗащищенноеСоединениеДляВходящейПочты Тогда Профиль.ИспользоватьSSLPOP3 = Истина; КонецЕсли; Если вхУчетнаяЗапись.ТребуетсяSMTPАутентификация Тогда Профиль.АутентификацияSMTP = СпособSMTPАутентификации.ПоУмолчанию; Профиль.ПарольSMTP = вхУчетнаяЗапись.ПарольSMTP; Профиль.ПользовательSMTP = вхУчетнаяЗапись.ЛогинSMTP; Иначе Профиль.АутентификацияSMTP = СпособSMTPАутентификации.БезАутентификации; Профиль.ПарольSMTP = ""; Профиль.ПользовательSMTP = ""; КонецЕсли; Если вхУчетнаяЗапись.ВремяОжиданияСервера > 0 Тогда Профиль.ВремяОжидания = "40";//вхУчетнаяЗапись.ВремяОжиданияСервера; КонецЕсли; Возврат Профиль; КонецФункции Далее когда передаю на почту данные в куске Профиль = ПолучитьИнтернетПочтовыйПрофиль(вхУчетнаяЗаписьПочты); Сообщение = Новый ИнтернетПочтовоеСообщение; //Сообщение.Отправитель = вхУчетнаяЗаписьПочты.АдресЭлектроннойПочты; Сообщение.Отправитель.Адрес = "Адрес"; Сообщение.Отправитель.Пользователь = "Пользователь"; Сообщение.Отправитель.Сервер = "Сервер "; Сообщение.ИмяОтправителя = "ИмяОтправителя ";//"UPP"; Сообщение.Получатели.Добавить(вхЕмаил); Если вхКопия <> "" Тогда Сообщение.Копии.Добавить(вхКопия); КонецЕсли; Сообщение.Тема = ТемаПисьма; Сообщение.Тексты.Добавить(ТелоПисьма + "<p>Sincerely yours, 1C:Payroll & HR Management</p>", ТипТекстаПочтовогоСообщения.HTML); Сообщение.Вложения.Добавить(ИмяАрихиваПолное); Почта = Новый ИнтернетПочта; //Попытка Почта.Подключиться(Профиль); В момент подключения он мне выдает ошибку что SMTP error code 3 , обычно связанную с объемом сообщения. Но я рассылаю рассчетки, там размер маленький, механизм работает корректно и работал корректно по протоколу pop3 для mail.ru, вывел SMTP и IMAP он начал выдавать такую ошибку (организация переехала на свою почту), Буду благодарен за любую помощь! Ссылки на форуме уже все посмотрел) по моему случаю подсказок нет. Порты проставляются верные, адреса и все учетные данные проставляются верно, пароля приложения на нашем сервисе нет |
|||
|
1
RomarioLQ
16.08.23
✎
12:45
|
Извиняюсь за некорректную тему! Забыл поменять от изначального вопроса!
|
|||
|
2
RomarioLQ
16.08.23
✎
12:55
|
Дело не в теме и не во вложении, убирал в комменты, та же ошибка, порты и данные профиля выставляются верно
|
| Форум | Правила | Описание | Секции | Поиск |