1
Vb.net программа, которая отправляет электронное письмо? Можем ли мы это сделать?Программа Vb.net, которая отправляет электронную почту?
Vb.net программа, которая отправляет электронное письмо? Можем ли мы это сделать?Программа Vb.net, которая отправляет электронную почту?
Или
Imports System.Net.Mail
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Try
Dim SmtpServer As New SmtpClient()
Dim mail As New MailMessage()
SmtpServer.Credentials = New _
Net.NetworkCredential("[email protected]", "password")
SmtpServer.Port = 587
SmtpServer.Host = "smtp.gmail.com"
mail.From = New MailAddress("[email protected]")
mail.To.Add("TOADDRESS")
mail.Subject = "Test Mail"
mail.Body = "This is for testing SMTP mail from GMAIL"
SmtpServer.Send(mail)
MsgBox("mail send")
Catch ex As Exception
MsgBox(ex.ToString)
End Try
End Sub
End Class
выглядит правильно, хотя я хотел бы предложить 'Использование почты в качестве новой MailMessage()' так MailMessage реализует IDisposable – MarkJ
Кроме того, код создает новый MailMessage дважды. –
это типичный стиль программирования в стиле «темное» программирование - удары по исключениям, пока он «не работает». обычно вы увидите, что каждый метод начинается с try и end с улавливанием базового исключения. у нас был один разработчик, который бы это сделал. catch ex в качестве исключения ... response.write (" ") в каждом методе. пользователям понравилось видеть их в качестве дополнительного бонуса, если в сообщении об исключении была единственная цитата, будет ошибка js, и страница не будет выполнена правильно – Shawn