<% Sub LogActiveUser Dim strActiveUserList Dim intUserStart, intUserEnd Dim strUser Dim strDate strActiveUserList = Application("ActiveUserList") If Instr(1, strActiveUserList, Session.SessionID) > 0 Then Application.Lock intUserStart = Instr(1, strActiveUserList, Session.SessionID) intUserEnd = Instr(intUserStart, strActiveUserList, "|") strUser = Mid(strActiveUserList, intUserStart, intUserEnd - intUserStart) strActiveUserList = Replace(strActiveUserList, strUser, Session.SessionID & ":" & Now()) Application("ActiveUserList") = strActiveUserList Application.UnLock Else Application.Lock Application("ActiveUsers") = CInt(Application("ActiveUsers")) + 1 Application("ActiveUserList") = Application("ActiveUserList") & Session.SessionID & ":" & Now() & "|" Application.UnLock End If End Sub Sub ActiveUserCleanup Dim ix Dim intUsers Dim strActiveUserList Dim aActiveUsers Dim intActiveUserCleanupTime Dim intActiveUserTimeout intActiveUserCleanupTime = 1 'In minutes, how often should the ActiveUserList be cleaned up. intActiveUserTimeout = 20 'In minutes, how long before a User is considered Inactive and is deleted from ActiveUserList If Application("ActiveUserList") = "" Then Exit Sub If DateDiff("n", Application("ActiveUsersLastCleanup"), Now()) > intActiveUserCleanupTime Then Application.Lock Application("ActiveUsersLastCleanup") = Now() Application.Unlock intUsers = 0 strActiveUserList = Application("ActiveUserList") strActiveUserList = Left(strActiveUserList, Len(strActiveUserList) - 1) aActiveUsers = Split(strActiveUserList, "|") For ix = 0 To UBound(aActiveUsers) If DateDiff("n", Mid(aActiveUsers(ix), Instr(1, aActiveUsers(ix), ":") + 1, Len(aActiveUsers(ix))), Now()) > intActiveUserTimeout Then aActiveUsers(ix) = "XXXX" Else intUsers = intUsers + 1 End If Next strActiveUserList = Join(aActiveUsers, "|") & "|" strActiveUserList = Replace(strActiveUserList, "XXXX|", "") Application.Lock Application("ActiveUserList") = strActiveUserList Application("ActiveUsers") = intUsers Application.UnLock End If End Sub %>

Louiseville Slugger and Adidas Present
The 2006 NSA Class "B" Girls Youth Fastpitch World Series
Salem/Roanoke VA. July 22nd - July 30th

 

Tournament Pool Play and Brackets
Remember Coaches, always use the Brackets at the parks!
10U Pool Play

10U Bracket		 12U Pool Play

12U Bracket

 14U Pool Play

14U Bracket
16U Pool Play

16U Bracket

 18U Pool Play

18U Bracket

 Game Photos and Additional Info

 

 

 

 

 

 


 

 

 

 

 

 

 

 

 

 

 

 
******  IMPORTANT REMINDER TO ALL TEAMS *******
 
All Face Mask must bear the NOCSAE Stamp
per the 2006 NSA Rulebook

Teams List

Welcome back NSA World Series!
The Salem/Roanoke area is no stranger to premier  Fastpitch sofball.  In 2002 Salem/Roanoke NSA Class B World Series.
Over the years Salem/Roanoke has hosted several NCAA Championships. The latest was this past year.
 

Coaches
Your official NSA roster, along with your entry fee must be sent through your State Director. Your state director will forward the information, and entry fee to the tournament director. Teams must have a completed signed on-line roster turned in prior to the tournament

PIN SWAP COOK OUT !!

JULY 25TH 6:00 – 9:00
GREEN HILL PARK 

PRE-SALE TICKETS $8.00
AT THE COOK-OUT $10.00

 BUFFET
HOTDOGS, HAMBURGERS, BAKED BEANS
POTATO CHIPS, LEMONADE, WATER

 PRE-SALE MUST BE IN BY JULY 19TH
MAKE CHECK PAYABLE: CITY OF SALEM

MAIL TO: CITY OF SALEM PARKS & RECREATION
620 FLORIDA STREET - SALEM, VA 24153

Coaches please pick up your pre-sold Cook Out tickets when you check in.

Click here to download your form