VB.Net by API/System.Web.Mail/Smtp

Материал из VB Эксперт
Перейти к: навигация, поиск

Smtp.Send(MailMessage mm)

<source lang="vbnet"> Imports System.Web.Mail Module Module1

   Sub Main()
       Dim Smtp As SmtpMail
       Smtp.SmtpServer = "Put Your STMP Server Address Here"
       Dim Msg As MailMessage = New MailMessage()
       Msg.Body = "Demo message from a program"
       Msg.From = "fromEmail@SomeSite.ru"
       Msg.To = "toEMail@SomeSite.ru"
       Msg.Subject = "Demo Message"
       Smtp.Send(Msg)
   End Sub

End Module


 </source>


Smtp.SmtpServer

<source lang="vbnet"> Imports System.Web.Mail Module Module1

   Sub Main()
       Dim Smtp As SmtpMail
       Smtp.SmtpServer = "Put Your STMP Server Address Here"
       Dim Msg As MailMessage = New MailMessage()
       Msg.Body = "Demo message from a program"
       Msg.From = "fromEmail@SomeSite.ru"
       Msg.To = "toEMail@SomeSite.ru"
       Msg.Subject = "Demo Message"
       Smtp.Send(Msg)
   End Sub

End Module


 </source>