<%
dim currentItem = " active"
If Session("menu.option") Is Nothing Then
Session.Add("menu.option", "home")
End If
Session("menu.home") = ""
Session("menu.service") = ""
Session("menu.product") = ""
Session("menu.project") = ""
Session("menu.gallery") = ""
Session("menu.blog") = ""
Session("menu.about") = ""
Session("menu.contact") = ""
Session("description.home") = "Visit the home page of J&R General, LLC - the residential and commercial roofing, siding, and window professionals in Pawcatuck, CT."
Session("description.services") = "Learn about the residential and commercial roofing, siding, and window services which are offered by the professionals at J&R General, LLC, of Pawcatuck CT."
Session("description.products") = "View some the roofing, siding, and window products which are commonly utilized by J&R General in the completion of their residential and commercial roofing, siding, and window projects throughout RI and Southeastern CT."
Session("description.projects") = "Review some of the residential and commercial roofing, siding, and window projects which have been completed by the professionals at J&R General, LLC, of Pawcatuck CT."
Session("description.gallery") = "View a gallery of completed projects from the roofing, siding, and window professionals at J&R General of Pawcatuck, CT."
Session("description.blog") = "Read J&R General's Blog posts to catch up on some of our projects throughout Southeastern New England."
Session("description.about") = "View background information and the mission of J&R General, LLC, of Pawcatuck CT."
Session("description.contact") = "Contact information for the commercial and residential roofing, siding, and window professionals at J&R General of Pawcatuck, CT."
Select Case Session("menu.option")
Case "home"
Session("menu.home") = currentItem
Case "services"
Session("menu.service") = currentItem
Case "products"
Session("menu.product") = currentItem
Case "projects"
Session("menu.project") = currentItem
Case "gallery"
Session("menu.gallery") = currentItem
Case "blog"
Session("menu.blog") = currentItem
Case "about"
Session("menu.about") = currentItem
Case "contact"
Session("menu.contact") = currentItem
End Select
%>