<% 'Set Default Values 'Cookie retriever If Len(Request.Form("Surveyor"))>0 Then DefaultSurveyor = Request.Form("Surveyor") Else DefaultSurveyor = Request.Cookies("SARG")("Surveyor") End If DefaultSite = Request.Form("sitename") DefaultDate = Request.Form("SurveyDate") If Len(Request.Form("email"))>0 Then DefaultEmail = Request.Form("email") Else DefaultEmail = Request.Cookies("SARG")("email") End If %> <% 'Validation on submission FatalError = False SubmissionAttempt = False If Request.Form("submitsitedetails")="Enter Sightings" Then SubmissionAttempt = True 'validate name If len(Request.Form("Surveyor"))<8 AND Not(InStr(Request.Form("Surveyor")," "))Then FatalError = True SurveyorError = True SurveyorErrorStr = "Please enter a valid name. Eg Steve Langham or Mr S Langham" Else Response.Cookies("SARG")("Surveyor") = Request.Form("Surveyor") End If 'validate email If IsValidEmail(Request.Form("email")) Then Response.Cookies ("SARG")("email") = Request.Form("email") Else FatalError = True EmailError = True EmailErrorStr = "Please enter a valid email." End If 'validate sitename If len(Request.Form("sitename"))>0 Then DoNothing = TRUE Else FatalError = True SiteNameError = True SiteNameErrorStr = "Please select your survey site." End If 'validate date If len(Request.Form("SurveyDate"))>0 Then DoNothing = TRUE Else FatalError = True SurveyDateError = True SurveyDateErrorStr = "Please enter a valid date." End If 'cookie expiry date Response.Cookies("SARG").Expires= MonthName(Month(Now)) & " " & Day(Now) & ", " & Year(Now) + 1 End If %> <% 'determine body and form types If (SubmissionAttempt = True) and (FatalError = False) Then 'Passed validation, redirect form, auto run form on body load FormName = "/SARG/12000-Sightings/SARG2SightingsAnimals.asp" BodyScript = " onload=" & Chr(34) & "document.sitereport.submit();" & Chr(34) Else 'Failed validation, keep form action on this form, do not auto submit FormName = "/SARG/12000-Sightings/SARG2SightingsSite.asp" BodyScript = "" End If %> Surrey Amphibian and Reptile Group (SARG) - Reptile Survey Reporting >

Animal Sighting Report

Step 1 (of 2) - Your details, date and location. <% If FatalError Then %>
Form Error
<% End If %>

Your Name:

<% If SurveyorError Then %>
<%=SurveyorErrorStr%><% End If %>

Forename and surname. This is the name that we will associate with your sighting report, and, should we wish to contact you regarding your sighting, we will use this name to address the email. Names will never be passed on to anybody else, nor used other than to contact you directly by SARG.

Your Email Address:

<% If EmailError Then %>
<%=EmailErrorStr%><% End If %>

We need your email address so that we can contact you, if we wish to talk to you about your sighting. Your email address will never be passed on, and will only ever be used by SARG to contact you directly concerning your sighting report.

Name of Site:

<% If SiteNameError Then %>
<%=SiteNameErrorStr%><% End If %>

This is the name of the place that you saw your animal(s). It might be an open space, such as Frensham Common, a Residential Garden or anything else that we can use to recognise the location.

Date of Sighting(s):

<% If SurveyDateError Then %>
<%=SurveyDateErrorStr%><% End If %>

Click on the 'Calendar' button and select the date that you saw the animal(s) being reported.