%@LANGUAGE=JAVASCRIPT%> <%Response.Expires=-1%> <% var submit = String(Request.Form("submit")); if (submit == "submit") { //SEND EMAIL TO WEBMASTER var strIntro, strBody, objCDOMail; strIntro = "A visitor to the Total Panels website (AllPlastics) has submitted the following message:" + "\n\n"; strBody = strBody + "First Name = " + Request.Form("fname") + "\n"; strBody = strBody + "Last Name = " + Request.Form("lname") + "\n"; strBody = strBody + "Company Name = " + Request.Form("cname") + "\n"; strBody = strBody + "Stree Address = " + Request.Form("address") + "\n"; strBody = strBody + "Suburb = " + Request.Form("suburb") + "\n"; strBody = strBody + "State = " + Request.Form("state") + "\n"; strBody = strBody + "Postcode = " + Request.Form("pcode") + "\n"; strBody = strBody + "Phone= " + Request.Form("phone") + "\n"; strBody = strBody + "Email = " + Request.Form("email") + "\n"; strBody = strBody + "Mobile = " + Request.Form("mobile") + "\n"; strBody = strBody + "How did you hear about website = " + Request.Form("hear") + "\n"; strBody = strBody + "Message = " + Request.Form("message") + "\n"; strBody = strBody + "========================================"; var objConfig = Server.CreateObject("CDO.Configuration"); var Flds = objConfig.Fields; Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2; Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "localhost"; Flds.Update(); var objCDOMail = Server.CreateObject("CDO.Message"); objCDOMail.Configuration = objConfig; objCDOMail.From = "vick@allplastics.com.au"; objCDOMail.To = "vick@allplastics.com.au"; objCDOMail.Subject = "Total Panels << ALLPLASTICS WEBSITE ENQUIRY >>"; objCDOMail.TextBody = strIntro + strBody; if (Request("email") != "") { objCDOMail.ReplyTo = Request("email"); } objCDOMail.Send(); objCDOMail = null; Response.Redirect("contact_tks.htm"); } %>
![]() |
|
|
|||||||||||||||||||||||||||||||||
|
|||||||||||||||||||||||||||||||||||||||||||||
|