Страница: 1 |
Страница: 1 |
Вопрос: oшибка smtp
Добавлено: 06.06.10 10:34
Автор вопроса: программер
по тестированию отправки почтывылетает непонятная ошибка
с плохой кодировкой, где в конце написано: not available.
это значит "недоступен" Что это такое и как это исправить?
Использовал такой код отправки сообщения:
Dim o_Mess As Object, v_Conf As String
Set o_Mess = CreateObject("CDO.Message")
v_Conf = "http://schemas.microsoft.com/cdo/configuration/"
With o_Mess
.To = "AddressTo@mail.ru"
.From = "AddressFrom@mail.ru"
.Subject = "Тема письма"
.TextBody = "Текст письма"
.AddAttachment "C:\1.txt"
With .Configuration.Fields
.Item(v_Conf & "sendusing") = 2
.Item(v_Conf & "smtpserver") = "smtp.YourMailServer.ru"
.Item(v_Conf & "smtpauthenticate") = 1
.Item(v_Conf & "sendusername") = "YourLog@YourDomain.ru"
.Item(v_Conf & "sendpassword") = "YourPassword"
.Item(v_Conf & "smtpserverport") = 25
.Item(v_Conf & "smtpusessl") = False
.Item(v_Conf & "smtpconnectiontimeout") = 60
.Update
End With
.send
End With
Естевственно, данные программа считывала из текстбоксов.
Ответы
Всего ответов: 1
Номер ответа: 1
Автор ответа:
VbStarter
ICQ: 357911808
Вопросов: 118
Ответов: 1340
Web-сайт:
Профиль | | #1
Добавлено: 07.06.10 15:59
ты для начала ошибку предоставь.