%@LANGUAGE="VBSCRIPT"%> <% ' IMPORTANT : DO NOT DELETE ANY LINES FROM THIS FILE. ' IF YOU DO NOT HAVE A VALUE FOR A VARIABLE OR DO NOT WANT TO USE IT ' THEN EITHER LEAVE IT BLANK (E.G. ="") OR COMMENT IT OUT BY TYPING A ' IN COLUMN 1 Dim strEventLocation, strEventDate, strEventType Dim strPhotoSrc, strPhotoHref, strPhotWidth, strPhotoHeight Dim strFlyer, strDetails Dim strEntries, strFabianStatus, strFabianID Dim strResults, strBOFEventNo, strColour, strString, strRGeventID, strWinSplitsID, strSplitsBrowserID Dim strForum, strContact ' PUT THE VALUES OF THE DIFFERENT VARIABLES IN THE SECTION BELOW. ' DO NOT EDIT THE HTML FILE EVENT_HOME.HTM ' strEventLocation = "VALLEY OF DESOLATION, BOLTON ABBEY" strEventDate = "Sunday 24 February 2013" strEventType = "Level B Cross Country Race - a Yorkshire Superleague event" strPhotoSrc = "valley-of-desolation-01.jpg" '350x262 'Address and filename for photograph of area strPhotoWidth = "300" strPhotoHeight = "225" 'strPhotoHref = "http://www.visitbradford.com/ilkley/things-to-do/" 'Link when clicking on photograph (optional) strFlyer = "/ClubDocs/2013/valleyofdesolation2013_flyer.pdf" strDetails = "/events/archiveresults/2013/2013-02-24_Desolation/VOD_FinalDetails Feb 2013 version 2.doc" 'Address and filename for Final Details strEventStatus="DONE" 'leave blank until event is over, then set to "DONE" strEntries = "FAB" 'VALUES: ' "EOD" - EOD only, "FAB" - Online Entries via Fabian4 strFabianStatus = "O" 'VALUES: P - pending, C - closed, O - open strFabianID = "789" 'Fabian4 event ID strFabianClose = "at midnight on Sunday 17th February" strResults = "Results/index.html" 'Address and filename for results Index file strBOFEventNo = "60194" 'Event ID used by BOF website Event Fixtures strColour = "Results/colour_standards.html" 'Address and filename for Colour Standards strString = "NOSTRING" 'Address and filename for String Course Results - if no string course then strString="NOSTRING" strRGeventID ="81" 'RouteGadget event ID strWinSplitsID = "24375" 'WinSplits event ID password dyhgev strSplitsBrowserID = "6303" 'SplitsBrowser event ID strForumTopicID = "161" 'AIRE Forum topic ID strContact = "Any queries please contact the organiser Guy Patterson on 0113 229 2201 (before 9pm please) or via email guypattersonAThotmail.co.uk" %>