New Milton RFC

<%@LANGUAGE="VBSCRIPT" CODEPAGE="CP_ACP"%> New Milton RFC <% dim fsoObject, tsObject, filObject, textFile, mainHeading, mygetcontent, matchReport, mainNewsHeading, mainNewsItem, pictureName, nextMatch,caption set myGetContent = New getContent set fsoObject = Server.CreateObject("Scripting.FileSystemObject") set filObject = fsoObject.Getfile(Server.MapPath("\Upload\Home\Text\main.txt")) set tsObject = filObject.OpenAsTextStream textFile = tsObject.ReadAll mainHeading = myGetContent.getText(textFile,"**MAIN HEADING**") firstparagraph = myGetContent.getText(textFile,"**FIRST PARAGRAPH**") picture = myGetContent.getText(textFile,"**PICTURE**") caption = myGetContent.getText(textFile,"**CAPTION**") secondparagraph = myGetContent.getText(textFile,"**SECOND PARAGRAPH**") nextMatch = myGetContent.getText(textFile,"**NEXT MATCH**") set fsoObject = Nothing set tsObject = Nothing set filObject = Nothing set textfile = Nothing set fsoObject = Server.CreateObject("Scripting.FileSystemObject") set filObject = fsoObject.Getfile(Server.MapPath("\Upload\Home\Text\news.txt")) set tsObject = filObject.OpenAsTextStream textFile = tsObject.ReadAll dim noOfNewsItems noOfNewsItems = cInt(myGetContent.getText(textFile,"**NO OF ITEMS**")) dim newsheadings(100) dim newsitems(100) for i = 0 to noOfNewsItems - 1 newsheadings(i) = myGetContent.getText(textFile,"**HEADING " + cstr(i + 1) + "**") newsitems(i) = myGetContent.getText(textFile,"**ITEM " + cstr(i + 1) + "**") next set fsoObject = Nothing set tsObject = Nothing set filObject = Nothing set textfile = Nothing set fsoObject = Server.CreateObject("Scripting.FileSystemObject") set filObject = fsoObject.Getfile(Server.MapPath("\Upload\Home\Text\events.txt")) set tsObject = filObject.OpenAsTextStream textFile = tsObject.ReadAll dim noOfEventItems noOfEventItems = cInt(myGetContent.getText(textFile,"**NO OF ITEMS**")) dim eventheadings(100) dim eventitems(100) for i = 0 to noOfEventItems - 1 eventheadings(i) = myGetContent.getText(textFile,"**HEADING " + cstr(i + 1) + "**") eventitems(i) = myGetContent.getText(textFile,"**ITEM " + cstr(i + 1) + "**") next set fsoObject = Nothing set tsObject = Nothing set filObject = Nothing set textfile = Nothing %>

Directions to New Milton & District Rugby Football Club

From the A35 Christchurch/Lyndhurst road
Turn south onto B3058 to New Milton.
On entering the town on Fernhill lane go
over the railway into Station Road and
turn left at the traffic lights into
Ashley Road....

From the A337 Christchurch/Lymington road.
On entering the town go north on the B3058
up Station Road and turn right at the traffic
lights into Ashley Road (do not cross the railway)...

...proceed along Ashley Road passing Oak Road on
your left and then past the junction with
Litchford Road (left) and High Ridge (right)
then turn right into the club just before the
junction with Kings Road on your left.

Please click here for a map

New Milton and District Rugby Club
Ashley Sports Ground,
Ashley,
New Milton,
Hampshire.
BH25 5BP.

Tel. 01425 610401