<%@ Language=VBScript %> <% Option Explicit Response.Buffer = true Response.Expires = -1000 Dim JMail, emailmsg, thing, msg %> Country Sew


   Contact us

    
Country sew would be more than happy to discuss your project please call cherry on 01837 840625 or use the contact form below.

Country Sew
Higher Collibeer
Spreyton
Devon
EX17 5BA

Telephone: 01837 840625

Email: info@country-sew.co.uk

Business name:
Name of contact within business:
Phone number:
Email address:
   
Enquiry:
     
<% ' Amend the Recipient, Subject and redirected page below. if (Request.Form("Submit")) = "Send" then emailmsg = "" for each thing in request.form emailmsg = emailmsg & trim(thing) & ": " & trim(request.form(thing)) & vbcrlf next set msg = Server.CreateOBject( "JMail.Message" ) msg.Logging = true msg.silent = false msg.From = request.form("email") msg.AddRecipient "stu@noodlenet.co.uk" 'Recipient of emailed form msg.Subject = "Enquiry form from country sew" 'Subject of Email msg.Body = cstr(EmailMsg) msg.Send( "www14.redstation.co.uk" ) 'Change this to www2, www3 etc response.redirect "thankyou.htm" 'address of thank you page end if %>