<%@LANGUAGE = VBSCRIPT%> <% ' Get the form data name = Request.Form("Hotmoss") senderEmail = Request.Form("sender") subject = "Thank you for your order [" & Request.Form("DomainName1") & "]" recipient = Request.Form("Email") body = "Details for Domain Name Order:" & vbcrlf & vbcrlf & "--------------------------------------------------------------------" & vbcrlf & "Domain Name: " & Request.Form("DomainName1") & vbcrlf & "Add. Domain Name: " & Request.Form("DomainName2") & vbcrlf & "Company Name: " & Request.Form("CompanyName") & vbcrlf & "Business Type: " & Request.Form("AcnAbnRbn") & Request.Form("AcnAbnRbnNumber") & vbcrlf & "--------------------------------------------------------------------" & vbcrlf & "Email: " & Request.Form("Email") & vbcrlf & "Phone: " & Request.Form("Phone") & vbcrlf & "--------------------------------------------------------------------" & vbcrlf & "Postal Address:" & vbcrlf & vbcrlf & Request.Form("PostalAddress") & vbcrlf & "--------------------------------------------------------------------" & vbcrlf & "Special Instructions:" & vbcrlf & vbcrlf & Request.Form("SpecialInstructions") & vbcrlf & "--------------------------------------------------------------------" & vbcrlf & vbcrlf & "Your domain should be registered within 48 hours. Please direct any enquiries to webmaster@hotmoss.com" & vbcrlf & vbcrlf & "Thank you for choosing Hotmoss Media Pty. Ltd." ' Create the JMail message Object set msg = Server.CreateOBject( "JMail.Message" ) ' Set logging to true to ease any potential debugging ' And set silent to true as we wish to handle our errors ourself msg.Logging = true msg.silent = true ' Enter the sender data msg.From = senderEmail msg.FromName = name ' Note that as addRecipient is method and not ' a property, we do not use an equals ( = ) sign msg.AddRecipient recipient msg.AddRecipientBCC("webmaster@hotmoss.com") ' The subject of the message msg.Subject = subject ' And the body msg.body = body ' Now send the message, using the indicated mailserver if not msg.Send("smtp.ilisys.com.au") then Response.write "
" & msg.log & "
" else 'Response.write "Message sent succesfully!" Response.redirect "thankyou.htm" end if ' And we're done! the message has been sent. %>