%@ LANGUAGE="VBScript"%>
<%
'Dimenstion Variable
Dim HC
Dim Hits
Set HC = Server.CreateObject("HitCounter.CCounter")
Hits = HC.GetCurrentHitCount("", "rainhill.htm")
Call HC.IncrementHitCount("", "rainhill.htm")
Set HC = Nothing
%>
Rainhill Farm Welcomes You : : Site best viewed @ 800 X 600
Whether
for a short business trip, an extended stay in Rustenburg on business, or
a family break-away, Rainhill has it all to offer: meals at a lovely restaurant,
hiking routes in the Magaliesburg mountain, prolific birdlife, and all the
tranquillity one could wish for. This is the bit of heaven you have been looking
for!
Total
Hits <% =Hits %>
RAINHILL
FARM IS NOW OPEN ON
SUNDAYS FROM 11AM - 3PM
WINE TASTING
FIRST TUESDAY OF EVERY MONTH FROM 7PM
CLICK HERE TO VIEW PICTURES OF THE
LASTEST CRAFT MARKET