<% Session("PRODUCTURL")=request.form("PRODUCTURL") Session("productname")=request.form("productname") Session("URL")=request.form("URL") Session("reffName")=request.form("reffName") Session("reffEmail")=request.form("reffEmail") Session("product")=request.form("product") Session("note")=request.form("note") Session("itemid")=request.form("itemid") Dim strTo, strSubject, strBody Dim objCDOMail strTo = "Ayurbalance@gmail.com" strSubject = Session("reffName") & " wants to join your mailing list." strBody = "Note from " & Session("reffName") & ":" & "
-----------------------------------------------------------------
" & Session("note") & "
-----------------------------------------------------------------

" & Session("reffName") & " wants to join your mailing list.

Add this email address: " & Session("reffEmail") & "" Set objCDOMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.From = Session("reffEmail") objCDOMail.To = strTo objCDOMail.Subject = strSubject objCDOMail.BodyFormat = 0 objCDOMail.Body = strBody objCDOMail.Send Set objCDOMail = Nothing Session.Abandon() response.redirect "http://www.ayurvedicbalance.com/thankyou.asp" %>