Имя: Пароль:
1C
1C 7.7
v7: Эл.почта из 1с.
,
0 Vovik
 
08.02.12
15:14
Есть примеры как отправить эл.почту из 1с (без бат и оутлук).
Полагается использовать почту на mail.ru или yandex.
1 smaharbA
 
08.02.12
15:14
V7Plus.dll
2 Vovik
 
08.02.12
15:15
(1)Но при этом варианте надо ставить оутлук или другую почтовую прогу?
3 Rie
 
08.02.12
15:17
(0) Поищи внешнюю компоненту DialMail
4 mishaPH
 
08.02.12
15:18
(3) + ROMMail
5 Armando
 
08.02.12
15:18
CDO
6 BuHu
 
08.02.12
15:19
sendemail
7 BuHu
 
08.02.12
15:20
8 Nikitos
 
08.02.12
15:31
CDO не предлагать?
9 filh
 
08.02.12
15:32
(0) гуглится на раз.
10 Vovik
 
08.02.12
15:34
(8)Пример кода бы. А то что есть что с ходу не врубишься.
Везде примеры получения почты. А мне надо отправлять (с вложением)
11 Vovik
 
08.02.12
15:35
(9)Найди на раз отправку почту из 1с 77, пример, без почтовика (соединение с майлру или яндекс).
Яндексом пользоваться умею.
12 Vovik
 
08.02.12
15:36
Пока читаю это:
http://love1c.kiev.ua/prog/mail.htm#rom-mail
13 Nikitos
 
08.02.12
15:36
Set objArgs = WScript.Arguments ' Создать объект.
set sreg=createobject("wscript.shell")
Set ml  = CreateObject("CDO.Message")
Set mlo = CreateObject("CDO.Configuration")
Set mlc = mlo.Fields
Set ml.Configuration = mlo
mlc.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
mlc.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "192.168.0.1"
mlc.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
mlc.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
mlc.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "XXXXX"
mlc.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "XXXXX"
mlc.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 0
mlc.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60
mlc.Update
ml.to = objArgs(0)
ml.from = "[email protected]"
ml.subject = "Тестовое сообщение из VBS"
ml.TextBody = "This is some sample message text."
ml.Addattachment objArgs(1)
ml.send
Set mlc = Nothing
Set mlo = Nothing
Set ml = Nothing
14 Nikitos
 
08.02.12
15:37
правда VBS, но допилишь
15 Ёпрст
 
08.02.12
15:37
16 filh
 
08.02.12
15:37
17 МастерВопросов
 
08.02.12
15:38
(12) мне тоже "ROM-Mail.dll" больше понравился. Это не Ромиксовская поделка, случаем? :-)
18 Ёпрст
 
08.02.12
15:45
(17) нет
19 Vovik
 
08.02.12
15:51
Всем искренние благодарности. Буду разбираться:)
20 Rie
 
08.02.12
15:56
(17) Мне больше понравился DialMail - но тут уж, скорее, от задачи зависит, что удобнее.
21 Nikitos
 
08.02.12
16:00
CDO - вот наше всё :)
22 Vovik
 
08.02.12
16:01
Йоу. Ром майл отправляет. Только не пойму как он это делает без авторизации. Ну лан. Я побег. Займусь вечерком этим делм.
23 rutony
 
08.02.12
16:14
А чем объект ИнтернетПочта не угодил, нормально работает.