Send Email using SmartMail

On error resume next

Dim mySmartMail
Set mySmartMail = Server.CreateObject("aspSmartMail.SmartMail")
mySmartMail.Server = ""
mySmartMail.SenderName = "Your Name"
mySmartMail.SenderAddress = ""
mySmartMail.Recipients.Add "", "Muneeb Ahmad"
mySmartMail.Subject = "aspSmartMail Sample 1"
mySmartMail.Body = "This mail has been sent with aspSmartMail."
if Err.Number<>0 then
	Response.write "Error: " & Err.description
	Response.write "An e-mail has just been sent to " & mySmartMail.Recipients.Item(1).Name & "."
end if

You can follow any responses to this entry through the RSS 2.0 feed. Both comments and pings are currently closed.

AddThis Social Bookmark Button

Similar Posts

Comments are closed.