Mega Code Archive

 

Categories / VB.Net by API / System Web Mail

 

Smtp SmtpServer

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.com"         Msg.To = "toEMail@SomeSite.com"         Msg.Subject = "Demo Message"         Smtp.Send(Msg)     End Sub End Module