Dim отКого As String = "ff@mail.ru"
Dim кому As String = "mail@mail.ru"
' Построение тела (Body) сообщения
'
Dim sb As New StringBuilder()
sb.Append("Привет! Это моё ")
sb.Append("первое ")
sb.Append("почтовое сообщение")
' Создание Сообщения и задание его свойств
Dim mailMsg As New MailMessage(отКого, кому)
With mailMsg
.Subject = "Первое письмо"
.Body = sb.ToString
End With
Try
Dim client As New SmtpClient("mail.mail.ru")
client.Send(mailMsg)
MessageBox.Show("Ваше письмо успешно отправлено!", _
"Состояние отправки Email", MessageBoxButtons.OK, _
MessageBoxIcon.Information)
Catch exp As Exception
MessageBox.Show("The following problem occurred when attempting to " & _
"send your email: " & exp.Message, _
Me.Text, MessageBoxButtons.OK, MessageBoxIcon.Error)
End Try
Никто не подскажет , как здесь сделать авторизацию на mail.mail.ru?
Кто врубается напишет пару строк за минуту ( я не врубаюсь - не знаю
английский
).