Welcome

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Session("DocID") = "233" Const IMGS_DIR = "./rndimgs/" ' Initialize the random number generator. This is the ' command that tells the computer to give us psedo-random ' numbers when we use Rnd later. Randomize ' Variables for our FileSystemObject objects Dim objFSO, objFolderObject, objFileCollection, objFile, gccode, gccode2 ' A pair of integers for our random image selection Dim intFileNumberToUse, intFileLooper, intFileNumberToUse2 ' A "handle" to the file we choose to use Dim objImageFileToUse ' A variable to build our image tag Dim strImageSrcText, strImageSrcText2 ' Lets see what's in the directory: Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing ' Get a count of files and use it to generate a random ' number from 1 to the count-1. this is so that the 2nd 'number can always be one more than the first if they happen to be the same. intFileNumberToUse = Int((objFileCollection.Count-1) * Rnd)+1 ' Set up loop control so we exit when we get to the random ' file number we just picked. intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then ' Get a "handle" on the appropriate file Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next ' Build our img src tag text strImageSrcText = IMGS_DIR & objImageFileToUse.Name gccode=mid(objImageFileToUse.Name,1,len(objImageFileToUse.Name)-4) ' Get a count of files and use it to generate a random ' number from 1 to the count. intFileNumberToUse2 = Int(objFileCollection.Count * Rnd) + 1 if intFileNumberToUse2=intFileNumberToUse Then intFileNumberToUse2=intFileNumberToUse2 + 1 end if ' Set up loop control so we exit when we get to the random ' file number we just picked. intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse2 Then ' Get a "handle" on the appropriate file Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing ' Build our img src tag text strImageSrcText2 = IMGS_DIR & objImageFileToUse.Name gccode2=mid(objImageFileToUse.Name,1,len(objImageFileToUse.Name)-4) Set objImageFileToUse = Nothing ' Show the image: %> Welcome

Welcome

The third Mega event to be held in the UK took place on Saturday 31st July 2010, when the big event traveled North to the Scottish town of Perth.

As well as the main event there was a full range of side events, trade stands, geo-talks, raffle prizes, geocoin trading, travel bug swaps, and of course there was ample opportunity to speak to fellow cachers as well!

Big Tree Top 10
	The Big Tree Country organisation provided us with their top 10 views in Perthshire and if you click on the image to the left you will be able to download a pdf file which lists them all along with the a cache that will take you to the location.

Cache Clusters and Public Transport
In order to you help plan your time whilst you are here at the Mega Event, we have added two more pages to the Location section. The first shows where the the local cache clusters occur and the other provides access to a planning tool for detailing journeys using public transport.

The cache cluster information is displayed on an interactive map and using your mouse, you can quickly zoom into all the cluster locations. Clicking on each cache will display some basic information about it and within this information there are links back to the relevant cache page on geocaching.com. Click here to display the cache cluster page.

A few people have asked about public transport and we have added a plug in from the Travel Line Scotland website to help you plan your journeys. The calculator offers detailed journey information and will accept place names, postcodes, landmarks etc as valid start and end points. Click here to display the public transport calculator page.

Registrations pass the 1000 mark
Its good to see that earlier this year in May we received our 1000th person registering for Mega Scotland. Its clearly going to be an international event as we have received registrations from cachers living in 21 different countries around the world. For details of which countries these are and some other demographic information then please click here

Flag Counter
In order to gauge the international aspect to the event we have recently added a 'flag' counter, and as you can see below, its not just those from the UK who are showing an interest in the event.

For more information please post your question to the forum.

Link to cache page for <%=ucase(gccode)%>

Link to cache page for <%=ucase(gccode2)%>

Site Meter