%
url = Request.ServerVariables("SERVER_NAME")
If Request.Form("Submit") = "Send" Then
mail = "This contact form was sent from your website." & vbcrlf & vbcrlf
mail = mail & "Name : " & Request.Form("name") & vbcrlf
mail = mail & "Address : " & Request.Form("address") & vbcrlf
mail = mail & "Post Code : " & Request.Form("postcode") & vbcrlf
mail = mail & "Telephone : " & Request.Form("telephone") & vbcrlf
mail = mail & "Fax : " & Request.Form("fax") & vbcrlf
mail = mail & "Email : " & Request.Form("email") & vbcrlf
mail = mail & "Comments : " & Request.Form("comments") & vbcrlf
Set somail = Server.CreateObject("CDONTS.NewMail")
somail.To = "enquiries@sunset-solutions.co.uk"
somail.From = email
somail.Subject = "Contact Form Submission from sunset-solutions.co.uk"
somail.Body = mail
somail.Send
Set somail = nothing
'customer email
'mail = "Dear Customer," & vbcrlf
'mail = mail & "Thank you for your email, but our office is now closed until Monday 4th Jan." & vbcrlf & vbcrlf
'mail = mail & "Some orders for Sleeved Blankets may have been delayed due to late stock arrival." & vbcrlf
'mail = mail & "But all orders placed before December 20th will be despatched in time for pre Xmas delivery." & vbcrlf
'mail = mail & "We wish you a Merry Christmas and a Happy New Year."
'Set somail = Server.CreateObject("CDONTS.NewMail")
'somail.From = "enquiries@sunset-solutions.co.uk"
'somail.To = email
'somail.Subject = "Your Contact Form Submission from sunset-solutions.co.uk"
'somail.Body = mail
'somail.Send
'Set somail = nothing
Response.Redirect("http://" & url & "/thanks.asp")
End If
%>
Sunset Solutions- quality mail order products for the home and the individual, absonic Toning Belt, Personal Attack Alarms, Mobile Phone Emergency Chargers
Sunset
Solutions
Red
Beech House Henshall Lane
Dunham
Massey
Cheshire
WA145RN
United Kingdom