<% 'Get Session Variables Dim ls01std Dim ls02easi Dim ls03prop Dim ls04stock Dim ls05stock2 Dim ls19other Dim ls21enquiry Dim ls31reply1 Dim ls31reply2 Dim ls31reply3 Dim ls31reply4 Dim ls41when1 Dim ls41when2 Dim ls41when3 Dim ls51name Dim ls52jobtitle Dim ls53org Dim ls54email Dim ls55tel Dim ls55fax Dim ls61add1 Dim ls62add2 Dim ls63add3 Dim ls64add4 Dim ls66pcode Dim lserrmsg lserrmsg = session("mailtomsg") ls01std = session("ms01std") ls02easi = session("ms02easi") ls03prop = session("ms03prop") ls04stock = session("ms04stock") ls05stock2 = session("ms05stock2") ls19other = session("ms19other") ls21enquiry = session("ms21enquiry") ls31reply1 = session("ms31reply1") ls31reply2 = session("ms31reply2") ls31reply3 = session("ms31reply3") ls31reply4 = session("ms31reply4") ls41when1 = session("ms41when1") ls41when2 = session("ms41when2") ls41when3 = session("ms41when3") ls51name = session("ms51name") ls52jobtitle = session("ms52jobtitle") ls53org = session("ms53org") ls54email = session("ms54email") ls55tel = session("ms55tel") ls56fax = session("ms56fax") ls61add1 = session("ms61add1") ls62add2 = session("ms62add2") ls63add3 = session("ms63add3") ls64add4 = session("ms64add4") ls66pcode = session("ms66pcode") 'If no reply method selected default to first If ls31reply1 & ls31reply2 & ls31reply3 = "" Then ls31reply1 = "checked" End If 'If no reply when selected default to first If ls41when1 & ls41when2 & ls41when3 = "" Then ls41when1 = "checked" End If %>

E-mail diagram   Enquiry Form   E-mail diagram

 

We have changed our website host server, so the enquiry form is currently being re-designed

please email us at

sales@nectare.co.uk

Thank you for your interest