<% dim HeaderType HeaderType = "Random" Select Case HeaderType Case "Assigned" %> <% Case "Random" %> <% Case "About Rider Random" %> <% Case "Academics Random" %> <% Case "Athletics Random" %> <% Case "Faculty Random" %> <% Case "Student Life Random" %> <% Case "Newsroom Random" %> <% Case "Undergrad Admissions Random" %> <% Case "Alumni Random" %> <% Case "Community Random" %> <% Case "Cont Studies Random" %> <% Case "Give to Rider Random" %> <% Case "Grad Admissions Random" %> <% Case "Libraries Random" %> <% Case "Admissions Random" %> <% Case "Grad Academics Random" %> <% Case "GEMS Random" %> <% Case "SFS Random" %> <% end Select %> <% CrumbCount = 0 BCRendered = false %> Home > Academics ><% CrumbCount = CrumbCount + 1 if CrumbCount <> 2 and HaveHead and not OnSecondLevel and not BCRendered then Response.Write(" " & subsecHead & " >") BCRendered = True end if %> Liberal Arts Programs ><% CrumbCount = CrumbCount + 1 if CrumbCount <> 2 and HaveHead and not OnSecondLevel and not BCRendered then Response.Write(" " & subsecHead & " >") BCRendered = True end if %> English ><% CrumbCount = CrumbCount + 1 if CrumbCount <> 2 and HaveHead and not OnSecondLevel and not BCRendered then Response.Write(" " & subsecHead & " >") BCRendered = True end if %> Faculty & Staff ><% CrumbCount = CrumbCount + 1 if CrumbCount <> 2 and HaveHead and not OnSecondLevel and not BCRendered then Response.Write(" " & subsecHead & " >") BCRendered = True end if %> Dr. Matthew Boyd Goldie ><% CrumbCount = CrumbCount + 1 if CrumbCount <> 2 and HaveHead and not OnSecondLevel and not BCRendered then Response.Write(" " & subsecHead & " >") BCRendered = True end if %> Links
Font Size:
Default  |  Small  |  Medium  |  Large

Links

Rider

History of the English Language

Reference

Post-Colonial Literature

Writing

Medieval Literature

Arts - New Zealand

Literature and Language

<% function GetHeadline() GetHeadline = "Links" end function %>