<% 'check for form posting bSent = Request("formSent") If bSent = "True" Then ' process the form bError = "" tBody = "" For Each item In Request.Form 'add text to mail body tBody = tBody & item & " - " & request.Form(item) & vbcrlf If Left(item,1) = "X" Then 'check for a value If Trim(Request.Form(item)) = "" Then 'an obligatory field is empty bError = "The textbox " & replace(item,"_"," ") & " needs to be entered. Please try again" End If End If Next If bError = "" Then 'OK to post Set myMail = Server.CreateObject("CDONTS.NewMail") myMail.From = "enquiries@cmsols.co.uk" myMail.To = "enquiries@cmsols.co.uk" myMail.Body = tBody myMail.Subject = "Online Enquiry" myMail.Send() response.redirect("cms_thankyou.asp") End If End If %> Cable Management Systems - enquiry
cable management solutions

cable management solutions
Further Information Request
<%= bError %>
Personal Details:
Contact Name: ">
Company Name: ">

Address Details:
Street Name: ">
Town: ">
County: ">
Postcode: ">

Telephone:
">
E-mail: ">

Please send me further information on the following products:
checked <% end if %>> itsa™ Modular System (Power, Lighting, & Comms)
checked <% end if %>> itsa™ Floor Boxes
checked <% end if %>> Cableway 1000 Service Access Grommets
checked <% end if %>> Steel and Moulded Desk Modules (Power & Comms)
checked <% end if %>> itsa™ Track Underfloor Busbar Systems
checked <% end if %>> Distribution Systems for Solid Floors
checked <% end if %>> Bespoke Cable Management Systems (Power, Lighting & Comms)

checked <% end if %>> Please inform me of any future new products available from Floorplan
Home Floorplan CMS Map and Directions Back to Top
Floorplan Systems Limited - The Square - Great Eccleston - Preston - Lancashire - PR3 0ZB
Telephone +44 (0) 1995 672627 - Facsimile +44 (0) 1995 670457 e-mail: sales@cmsols.co.uk