Здравствуйте, 4erniyPlasch, Вы писали:
P>Здравствуйте, DioNNis, Вы писали:
DNN>>Кроме всего вышесказанного.... DNN>>Если ты собрался писать приложение для анонимной отправки писем, то с общеизвестными серваками у тебя такой номер не прокатит, потому как они требуют авторизации... Для этого существует специальный класс.
P>Ребят, а не приведете кусок кода для отправки через mail.ru. Я чего уже только не перепробовал — так письма и не отправляются. Вываливается ошибка, мол не могу отправить письмо.
P>Подозреваю, что я с credentials что-то не так делаю.
P>Спасибо.
Да, действительно, вот так вот (VB) почта отправляется сразу, без закрытия формы:
'---------------------------------------------------------------------------------------------------------------------------------------
Dim mailMsg As New System.Web.Mail.MailMessage
Dim SmtpMail As New Net.Mail.SmtpClient
With mailMsg
.From = String.Format("{0}@###.ru", Replace(My.User.Name, "SPB\", ""))
.To = "user1@###.ru"
.Subject = "Баланс"
.Body = "Выписка:"
.Priority = CType("222", Net.Mail.MailPriority)
End With
System.Web.Mail.SmtpMail.SmtpServer = "SMTP.###.ru"
Try
System.Web.Mail.SmtpMail.Send(mailMsg)
MessageBox.Show("Сообщение было отправлено!", "Email Send Status", MessageBoxButtons.OK, MessageBoxIcon.Information)
Catch exp As Exception
MessageBox.Show("Была обнаружена ошибка: " & exp.Message, "...", MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
'---------------------------------------------------------------------------------------------------------------------------------------
