Можно ли с программы отправить Email? - VB

Узнай цену своей работы

Формулировка задачи:

можно ли с программы отправить Email? т.е. пользователь набирает сообщение в Text и отправляет его на одно определенное мыло.

Решение задачи: «Можно ли с программы отправить Email?»

textual
Листинг программы
':::
'::: Отправка почты компонентом jmail.dll
':::
Set jmail = CreateObject("JMail.Message")
jmail.charset="windows-1251"                 ' кодировка
jmail.AddRecipient  "aaa@bbb.ru"             ' адрес получателя
jmail.From =  "fff@ggg.com"                  ' адрес отправителя
jmail.Body = "Текст письма..."               ' перевод на новую строку - & vbCrLf
jmail.Subject="OPER"                         ' тема письма
jmail.EnableCharsetTranslation=False         ' так надо...
jmail.AddAttachment( HomeDir & "\dan.xls" )  ' прикрепленный файл
jmail.Send( "имя_или_IP_почтового_сервера" ) ' лети!...
Set jmail=Nothing

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.3 из 5
Похожие ответы