VB.Net/Network Remote/Email

Send an Email out

<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>