<!-- #INCLUDE VIRTUAL="adovbs.asp"-->

<%

' change to address of your own SMTP server
strHost = "72.35.78.98"


   Set Mail = Server.CreateObject("Persits.MailSender")
   
   ' enter valid SMTP host
   Mail.Host = strHost
   Mail.Port = 25
   Mail.Username = "manoj.shriyan@acumen.co.in"
   Mail.Password = "yan-123"

   Mail.From = "manoj.shriyan@acumen.co.in"
   Mail.FromName = "Manoj @ Acumen WebSite"
   Mail.AddAddress "manoj.shriyan@acumen.co.in"

   ' message subject
   Mail.Subject = "HR Align @ Acumen WebSite"
   
   ' message body
   Mail.Body = "You Have Mail"
   strErr = ""
   bSuccess = False
   On Error Resume Next ' catch errors
   Mail.Send ' send message
   If Err <> 0 Then ' error occurred
      strErr = Err.Description
   else
      bSuccess = True
	  strErr = "Mail Sent"
   End If


Response.Write strErr

%>