'This document describes how to send email via a utility
'named ASPEmail.  This utility can be found at:
'http://www.aspemail.com/  
'It has a 30 evaluation version and the full version is available for $99.
'This is also an excellent and versatile product.
'
'Sending email from an ASP is actually quite simple, once you 
'know how to do it.  This page illustrates just how easy it is.




	'Create a mail object
	'Persits.MailSender is the driver used to send email
	Set mail = Server.CreateObject("Persits.MailSender")
	
	'Optional.  Resets the mail object
	mail.Reset
	
	'Name that will appear in From line of email instead
	'of the email address
	mail.FromName = "Ron Glotzbach"
	
	'Email address of the sender
	mail.From = "t-rongl@exmsft.com"
	
	'Mail host through which the email is sent
	mail.Host = "smtp.yourhost.com"
	
	'Email address you are sending To
	'This line grabs an email address from a session variable
	mail.AddAddress Session("Email")
	
	'Additional email address you are sending To
	mail.AddAddress "orderconfirm@yourhost.com"
	
	'Subject line of the emial
	mail.Subject = "Your Order - Customer Copy"
	
	'Body of the email
	'In this case, the body of the email was stored in a variable
	mail.Body = Mail_Body
	
	'Send the email
	mail.Send
	
	'Destroy the mail object
	Set mail = nothing