 |
 |
library media nexus policies |
 |
|
| |
| The Library Media Nexus is the combination of the student technology resource center and the school library - a place for students to come and access the latest information resources, from subscription databases and software to the internet and print materials. |
7:00-7:20 AM
Students must get a pass the day before.
7:20-7:50 AM
Open to students - no pass needed.
During School Hours
Students may get a pass from an academic teacher (not a study hall teacher) to use the Nexus or Library
Study Hall
Students must get a pass before the first bell rings in the morning
Lunch
Library accepts walk-ins, special permission needed for Nexus
Mon-Thurs (2:45-5:00 PM)
Open to students - no pass needed
Friday (2:45-3:00)
Open to students - no pass needed |
General Guidelines:
- Students must check in at the desk upon entrance to the Nexus or the Library.
- Students may obtain a pass to the Nexus or the Library for study hall if they have no overdue books.
- Students may get a pass to the Nexus two times per week and the Library two times per week.
- If a student does not show up after getting a pass, they will not be allowed to get a pass for a specific period of time.
- Preference for computer use will be given to students working on homework or projects for a class. We reserve the right to remove non-academically focused students from a computer if necessary.
- Disruptive or inappropriate behavior is unacceptable and will result in removal from the Nexus and the Library and a disciplinary referral.
|
|
|
|
<%
Dim strCalendarConn
strCalendarConn = "Driver={SQL Server};" & _
"Server=(local);" & _
"Database=calendar;" & _
"Uid=sgray;" & _
"Pwd=vaesrt"
Dim connCategory
Set connCategory = Server.CreateObject("ADODB.Connection")
With connCategory
.ConnectionString = strCalendarConn
.CursorLocation = adUseClient
End With
connCategory.Open()
Dim commCalendarCategory, rsCalendarCategory
Set commCalendarCategory = Server.CreateObject("ADODB.Command")
With commCalendarCategory
.ActiveConnection = connCategory
.CommandType = adCmdStoredProc
.CommandText = "calendarCategorySelectAllLMC"
End With
Set rsCalendarCategory = commCalendarCategory.Execute
Dim strID
While NOT rsCalendarCategory.EOF
If InStr(Replace(rsCalendarCategory("name"), " ", ""), strSchool) Then
strID = rsCalendarCategory("id")
End If
rsCalendarCategory.movenext
Wend
'Response.Write("strID: " & strID & "
")
'Response.Write("strSchool: " & strSchool & "
")
'Response.End
Dim connCustomPages
Set connCustomPages = Server.CreateObject("ADODB.Connection")
With connCustomPages
.ConnectionString = strConnCMS
.CursorLocation = adUseClient
End With
connCustomPages.Open()
Dim commCustomPages, rsCustomPages
Set commCustomPages = Server.CreateObject("ADODB.Command")
With commCustomPages
.ActiveConnection = connCustomPages
.CommandType = adCmdStoredProc
.CommandText = "lmcRecReadsSelectByLocation"
.Parameters.Append( .CreateParameter ("docType", adVarChar, adParamInput, 50, NULL ) )
.Parameters.Append( .CreateParameter ("Location", adVarChar, adParamInput, 50, strSchool ) )
End With
Dim connDownloads
Set connDownloads = Server.CreateObject("ADODB.Connection")
With connDownloads
.ConnectionString = strConnCMS
.CursorLocation = adUseClient
End With
connDownloads.Open()
Dim commDownloads, rsDownloads
Set commDownloads = Server.CreateObject("ADODB.Command")
With commDownloads
.ActiveConnection = connDownloads
.CommandType = adCmdStoredProc
.CommandText = "lmcDownloadInfo"
.Parameters.Append( .CreateParameter ("Location", adVarChar, adParamInput, 75, strSchool ) )
End With
Set rsDownloads = commDownloads.Execute
%>
|
