|
v7: DialMail .. не могу отправить письмо.. Поможете подправить параметры? | ☑ | ||
---|---|---|---|---|
0
aka AMIGO
22.04.13
✎
16:47
|
Синтаксис:
СоздатьПисьмо(<ОтКого>,<Кому>,<Копии>,<ТемаПисьма>,<Организация>, <ТелоПисьма>,<ПрисоединенныеФайлы>) моя интертрепация, г-код: текписьмо=ОтправкаПочты.СоздатьПисьмо("[email protected]","[email protected]",,"Прайс-лист",,"Высылаю прайс, целую",ПутьКФайлу); SMTP = "SMTP.bk.ru"; Логин = "valeri35"; Пароль = "pairolll"; ОтправкаПочты.Подключиться(СМТП,25,Логин,Пароль,1); //в логах пишет //"22.04.13 16:33:39.762 SMTP: Подключаемся к сокету //22.04.13 16:33:39.762 SMTP: ОШИБКА Подключиться() и не отправляет.. |
|||
1
aka AMIGO
22.04.13
✎
16:51
|
+0 правда, может прокси мешать.. это уже второй мой темный пунктик после параметров..
|
|||
2
aka AMIGO
22.04.13
✎
16:53
|
Ой, извините, конечно-же не ОтправкаПочты.Подключиться(СМТП,25,Логин,Пароль,1);
а ОтправкаПочты.Подключиться(SMTP,25,Логин,Пароль,1); но это не суть важно.. |
|||
3
ДенисЧ
22.04.13
✎
17:01
|
еудтуе SMTP.bk.ru 25 xnj ujdjhbn&
|
|||
4
ДенисЧ
22.04.13
✎
17:01
|
что говорит?
|
|||
5
Garfild
22.04.13
✎
17:15
|
Вот код в моей конфиге, только у меня без прокси
Процедура ГлОтправитьПисьмо(Логин,Пароль,Тема,Вложения,Адресант) Экспорт Если ЗагрузитьВнешнююКомпоненту("DialMail.dll")=0 Тогда Сообщить("Не удалось обнаружить компоненту DialMail.dll!"); Возврат; КонецЕсли; Попытка ОтправкаПочты = СоздатьОбъект("AddIn.SMTP"); ОтправкаПочты.ВестиЛогФайл = 1; ОтправкаПочты.ИмяЛогФайла = КаталогИБ()+"dialmail_smtp.log"; ОтправкаПочты.РабочийКаталог=КаталогИБ(); Исключение Сообщить("Не удалось создать объект из компоненты DialMail.dll!"); Возврат; КонецПопытки; СерверОтправки = "smtp.mail.ru"; ПортОтправки = "2525"; ИмяОтправителя ="Фирма"; АдресОтправителя=Логин; Тело=""; флАутентификацияПриОтправке=1; ОтправкаПочты.УстановитьКодировкуИСпособКодирования(14, 1); ОтправкаПочты.MakeContentDescriptionTag = 0; ОтправкаПочты.ТипТелаПисьма = 1; ОтправкаПочты.СкрытыеКопии = ""; ОтправкаПочты.ПочтоваяПрограмма = "1С_Тест"; ОтправкаПочты.Важность = 0; ПутьКФайлу=""; Для ном=1 По Вложения.РазмерСписка() Цикл //Берем из СЗ "Вложения" пути к файлам и формируем их в нужном формате ПутьКФайлу=ПутьКФайлу+","""+СокрЛП(Вложения.ПолучитьЗначение(Ном))+""""; КонецЦикла; Если СокрЛП(ПутьКФайлу)<>"" Тогда //Обрезаем запятую и лишние косые черты ПутьКФайлу=СтрЗаменить(ПутьКФайлу,"\\","\"); ПутьКФайлу=Сред(ПутьКФайлу,2); КонецЕсли; Если ПустоеЗначение(ОтправкаПочты.СоздатьПисьмо(АдресОтправителя, Адресант, "", Тема, "Фирма", Тело, ПутьКФайлу))=1 Тогда Сообщить("Ошибка при создании файла"); Возврат; КонецЕсли; ОтправкаПочты.ИмяПользователяПрокси=""; ОтправкаПочты.ПарольПрокси=""; ОтправкаПочты.ХостПрокси=""; ОтправкаПочты.ПортПрокси=""; // Если ОтправкаПочты.ИспользоватьПрокси=0 тогда все выше введенные // параметры не учитываются ОтправкаПочты.ИспользоватьПрокси = 0; ОтправкаПочты.ИспользоватьSSL = 0; ОтправкаПочты.ИспользоватьTSL = 0; Если ОтправкаПочты.Подключиться(СерверОтправки, ПортОтправки, Логин, Пароль)=0 тогда Сообщить("Не смогли подключиться к SMTP-серверу"); Возврат; КонецЕсли; Состояние("Отправка почты"); Пока ОтправкаПочты.КоличествоПисемВРабочемКаталоге>0 цикл Если ОтправкаПочты.ОтправитьПисьмо(1,1)<=0 тогда Предупреждение("Ошибка отправки письма"); ОтправкаПочты=0; Возврат; КонецЕсли; КонецЦикла; КонецПроцедуры |
|||
6
aka AMIGO
22.04.13
✎
18:55
|
(3) telnet я не знаю такой команды.. где её применить?
(4) внимательно изучаю, спасибо! |
|||
7
aka AMIGO
22.04.13
✎
19:08
|
+6 я понял, что за telnet.. у меня 7-ка, команды такой нет.. посмотрел в виртХР, нашел.. но там, в виртХР у меня нет интернета :)
ладушки, разберусь потихоньку :) |
|||
8
Тьма
22.04.13
✎
19:12
|
(7)telnet.exe можно из ХР скопировать и запустить в 7
|
|||
9
aka AMIGO
23.04.13
✎
08:19
|
(8) в вин-7, оказалось, тоже есть :)
http://did5.ru/it/windows/telnet-v-windows-7.html |
Форум | Правила | Описание | Объявления | Секции | Поиск | Книга знаний | Вики-миста |