<% Response.Buffer = True Dim strBody Dim objCDOMail Dim strMyEmailAddress Dim strCCEmailAddress Dim strBCCEmailAddress Dim strReturnEmailAddress strMyEmailAddress = "contact@10percentchallenge.co.uk" strCCEmailAddress = "espace@westsussex.gov.uk" strBCCEmailAddress = "" 'Read in the users e-mail address strReturnEmailAddress = Request.Form("email") 'Initialse strBody string with the body of the e-mail strBody = "

E-mail sent from 10% Challenge Website

" strBody = strBody & "
Message: " & Request.Form("message") strBody = strBody & "
Name: " & Request.Form("name") strBody = strBody & "
Telehone: " & Request.Form("phone") strBody = strBody & "
Fax: " & Request.Form("fax") strBody = strBody & "
E-mail: " & strReturnEmailAddress strBody = strBody & "
Website: " & Request.Form("website") & vbCrLf & "
" If Len(strReturnEmailAddress) < 5 OR NOT Instr(1, strReturnEmailAddress, " ") = 0 OR InStr(1, strReturnEmailAddress, "@", 1) < 2 OR InStrRev(strReturnEmailAddress, ".") < InStr(1, strReturnEmailAddress, "@", 1) Then strReturnEmailAddress = strMyEmailAddress End If Set objCDOMail = Server.CreateObject("CDONTS.NewMail") objCDOMail.From = Request.Form("firstName") & " " & Request.Form("lastName") & " <" & strReturnEmailAddress & ">" objCDOMail.To = strMyEmailAddress objCDOMail.Cc = strCCEmailAddress objCDOMail.Bcc = strBCCEmailAddress objCDOMail.BodyFormat = 0 objCDOMail.MailFormat = 0 objCDOMail.Subject = "E-mail sent from 10% Challenge Website" objCDOMail.Body = strBody objCDOMail.Importance = 2 objCDOMail.Send Set objCDOMail = Nothing %> Links - The 10% Challenge - West Sussex County Council Initiative
 
 



 

Transport Links

West Sussex County Council is not responsible for the content of external internet sites.

Transport has one of the biggest affects on our environment, but there are plenty of ways we can reduce our transport impacts. Here a a few links to other organisations who can help.

WestSussexCarShare.com - drive down commuting costs, register free today. Employers can establish private groups for staff.

Bike Week and Bike2Work Day - is an annual celebration of cycling. Employers can register Bike2Work events and receive free supporting materials to promote cycling to work.

Car Free Day - information about this annual event held in September.

Powershift.org.uk - access information and advice about cleaner vehicles, fleets & travel plans, how to find a grant or an event.

National Cycling Strategy - organisation which promotes cycling.

National Rail Enquiries - rail journey planning web site.

National TravelWise Association - NTWA is a partnership of local authorities and other organisations working together to promote sustainable transport. The website contains information about School and Business Travel Plans.

Sustrans - organisation which constructs cycling and walking routes. The website contains National Cycle Network maps.

Transport Direct - multi-modal journey planning website.

Traveline - public transport journey planning website.

WSCC Road Safety - road safety tips, driver training information, casualty statistics.

Supported by: