<% Const IMGS_DIR = "/radom mainpage/" Dim objFSO, objFolderObject, objFileCollection, objFile Dim intFileNumberToUse, intFileLooper Dim objImageFileToUse Dim strImageSrcText Set objFSO = Server.CreateObject("Scripting.FileSystemObject") Set objFolderObject = objFSO.GetFolder(Server.MapPath(IMGS_DIR)) Set objFSO = Nothing Set objFileCollection = objFolderObject.Files Set objFolderObject = Nothing Randomize() intFileNumberToUse = Int(objFileCollection.Count * Rnd) + 1 intFileLooper = 1 For Each objFile in objFileCollection If intFileLooper = intFileNumberToUse Then Set objImageFileToUse = objFile Exit For End If intFileLooper = intFileLooper + 1 Next Set objFileCollection = Nothing strImageSrcText = IMGS_DIR & objImageFileToUse.Name Set objImageFileToUse = Nothing %>

 

"Summer is almost here..."

 

 

Happy Birthday

Annie Tosso- 4

Kirstie Bardy-6

Sue Crawford-27



 

 


May 2008
Sunday Monday Tuesday Wednesday Thursday Friday Saturday
1
2
5th Grd. Farm Day

3rd Grd. Maritime Museum Trip

3

 
4

5
Library Summer Book Sale
May 5-9

Talented Theater Play 9AM
K-3

6
Library Summer Book Sale
May 5-9

Jr. High Choral Fest 8AM-12PM at CHS

Spring Band/Chorus Concert 6:30-9:30PM

7
Library Summer Book Sale
May 5-9

Splash Day PreK-4th

Chorus Field Trip to nursing home

8
Library Summer Book Sale May 5-9

Elementary Band Fest
@ FWJH 9AM-12PM

4th Grd. Lafayette Field Trip

9
Library Summer Book Sale
May 5-9

Elementary Chorus to nursing homes

10

 
11
12
All Sports Awards Ceremony 6:30-7:30 PM
13
FFA Banquet Gym 6:30-8:30
14
AR Rewards Survivor Party
2-5 Grds. 1-1:45
6-8 Grds. 2-2:45
15
4th nwks Exams Begin

16
Kindergarten Program in Gym 9AM

Student of Month Celebration 2PM

17

 
18

19
Last Day for Pre-K

Awards Day
T1-1st Gds...9AM
6-7th Gds...10AM
2nd Gd...12PM
4-5th Gds...1PM
3rd Gd...2PM
20
8th Grade Class Night
6:30-7:30PM

21

End of 4th nine weeks- 1/2 Day for Students
7:55-11:30AM

SCHOOL IS OUT

22

Teachers' Day
23
24
25
26
27
28
29
30

31