%@LANGUAGE="VBSCRIPT"%> <% Dim rsSiteNotice Dim rsSiteNotice_numRows Set rsSiteNotice = Server.CreateObject("ADODB.Recordset") rsSiteNotice.ActiveConnection = MM_dbConn_STRING rsSiteNotice.Source = "SELECT * FROM tbl_Site_Notice WHERE bitActive = TRUE ORDER BY cntNewsID_PK DESC , datDatePosted" rsSiteNotice.CursorType = 0 rsSiteNotice.CursorLocation = 2 rsSiteNotice.LockType = 1 rsSiteNotice.Open() rsSiteNotice_numRows = 0 %> <% if NOT(rsSiteNotice.EOF) then ' CHECK FOR NEWS ITEM / NOTICE ON MAIN PAGE AND IN DATE datDateExpire = (rsSiteNotice.Fields.Item("datDateExpire").Value) if datDateExpire > Now() then ynNoticeInDate = TRUE else ynNoticeInDate = FALSE end if end if %> <% ' get random photo images randomize intRand = INT(RND*14)+1 strHeaderImage = "images/banners/header-" & CStr(intRand) & ".jpg" intRand = INT(RND*14)+1 strBodyImage = "images/misc/home-" & CStr(intRand) & "-375.jpg" Dim aryHomeIcons(10) aryHomeIcons(1) = "home-icon-ball-block.gif" aryHomeIcons(2) = "home-icon-blocks.gif" aryHomeIcons(3) = "home-icon-ducky.gif" aryHomeIcons(4) = "home-icon-piglet.gif" aryHomeIcons(5) = "home-icon-shapes.gif" aryHomeIcons(6) = "home-icon-soft-ball.gif" aryHomeIcons(7) = "home-icon-soft-toys.gif" aryHomeIcons(8) = "home-icon-stacker.gif" aryHomeIcons(9) = "home-icon-stacker2.gif" aryHomeIcons(10) = "home-icon-teddy.gif" intRand1 = INT(RND*10)+1 strIcon1Image = "images/misc/" & aryHomeIcons(intRand1) intRand2 = INT(RND*10)+1 if intRand1 = intRand2 then intRand2 = intRand2 + 1 if intRand2 > 10 then intRand2 = 1 strIcon2Image = "images/misc/" & aryHomeIcons(intRand2) intRandSection1 = INT(RND*2)+1 intRandSection2 = INT(RND*2)+1 %>
To provide families with quality nursery and childcare – that’s the idea behind everything we do here at the Sandpit.
Choosing the right nursery for your child is both a difficult and an exciting time for all the family. Our website contains full information about the Sandpit Nursery, our beliefs, and how we care for and guide your child in the crucial first years. We hope that the information provided will encourage you to come and visit us where we will be delighted to show you and your child around.
<% ' ** SHOW RANDOM PAGE SECTIONS / LINKS TO OTHER PARTS OF SITE ** %> <% if intRandSection1 = 1 then ' show baby rooms link %>Find out how we make sure our Baby and Nursery rooms help to give your child the best possible start.
Read more
Find out more about guaranteeing the safety, security and quality of care and learning of your child.
Read more
Find answers to some of your more common queries, questions and concerns
Read more
Every Saturday from 10am – 3pm - more details available here »»
<% if ynNoticeInDate = TRUE then ' CHECK FOR NEWS ITEM / NOTICE ON MAIN PAGE %><% =strDetails %>
<% =dtmDate %>