Еще один вопрос: как осуществить отправку почты в фоновом режиме, т.е. без проверки подключения к Интернет, а при помощи почтовой программы, например Outlook.
- Код: Выделить всё
Private Sub LinkLabel1_LinkClicked(ByVal sender As System.Object, ByVal e As System.Windows.Forms.LinkLabelLinkClickedEventArgs) Handles LinkLabel1.LinkClicked
Dim email As New System.Web.Mail.MailMessage()
Try
email.To = LinkLabel1.Text
email.Body = "Текст сообщения"
email.BodyFormat = Web.Mail.MailFormat.Text
email.Subject = "Software "
' Использовать локальный SMTP сервер
System.Web.Mail.SmtpMail.SmtpServer = ""
' Отправить сообщение
System.Web.Mail.SmtpMail.Send(email)
' Изменяем текст ссылки, установив LinkVisited в значение True.
LinkLabel1.LinkVisited = True
Catch ex As Exception
MsgBox(ex.Message, MsgBoxStyle.Critical)
End Try
End Sub
