<%
' --- START OF MENU TEMPLATES --- '
' (SS,13/8/14) for use with Bootstrap, individual categories are listed

Sub ShowMenuHeader
%>
<!-- START OF MENU -->
    <div class="navbar navbar-default navbar-static-fixed" role="navigation">
      <div class="container">
        <div class="row">
        <div class="navbar-header">
          <button type="button" class="navbar-toggle" data-toggle="collapse" data-target=".navbar-collapse">
            <span class="sr-only">Toggle navigation</span>
            <span class="icon-bar"></span>
            <span class="icon-bar"></span>
            <span class="icon-bar"></span>
          </button>
          <a class="navbar-brand visible-xs" href="/">Ground Screw Centre</a>
          <p class="navbar-text visible-xs pull-right"><b>Menu</b>&nbsp;&nbsp;</p>
        </div>
        <div class="navbar-collapse collapse">
          <ul class="nav navbar-nav">  
<%
End Sub

Sub ShowMenuFooter
%>
            <li><a href="products.asp?page=calculator">Calculator</a></li> 
            <li><a href="products.asp?page=account" rel="nofollow">Account</a></li>
            <!--<li><a href="products.asp?page=contact">Contact</a></li>-->
            
            <!--<li class="active"><a href="#">Home</a></li>-->
            <li class="dropdown">
              <a href="#" class="dropdown-toggle" data-toggle="dropdown">Help</a>
              <ul class="dropdown-menu" role="menu">
                <li><a href="products.asp?page=about">About</a></li>
                <li><a href="products.asp?page=contact">Contact</a></li>
                <li><a href="products.asp?page=contact">Opening Times</a></li>                
                <li><a href="products.asp?page=customerinfo">Customer Info</a></li> 
                <li><a href="products.asp?page=privacy">Privacy Policy</a></li>
                <li><a href="products.asp?page=deliveryinfo">Delivery Info</a></li>  
                <li><a href="products.asp?page=faq">FAQ</a></li>
              </ul>
            </li>
          
          </ul>
          
        </div><!--/.nav-collapse -->          
 
      </div><!--row-->
      </div><!--container-->
    </div>
<!-- END OF MENU -->
<%
End Sub


' (SS,18/5/15) ALevelNo can be used to provide tidy indenting depending on no
Sub ShowMenuSingle(ACaption, AHRef, ALevelNo)
%>
            <li><a href="<%=AHRef%>"><%=ACaption%></a></li>
<%
End Sub

' (SS,18/5/15)
Sub ShowMenuDivider
%>
  <li class="divider"></li>
<%
End Sub

' (SS,18/5/15) ALevelNo can be used to provide tidy indenting depending on no
Sub ShowMenuDropdownHeader(ACaption, AHRef, ALevelNo)
%>
            <li><a href="<%=AHRef%>"><%=ACaption%></a>
              <ul class="dropdown-menu">
<%
End Sub

' (SS,18/5/15)
Sub ShowMenuDropdownFooter
%>
              </ul>
            </li>
<%
End Sub

' --- END OF MENU TEMPLATES --- '
If Not ForProductList Then
  'ShowMenuForCategories "" '"Cast Iron Radiators;Radiator Valves;Radiator Accessories"
  'ShowMenuForGroups ""
  ' (SS,3/2/16) added Vintage prefix
  StartMultiMenu "C"
  AddMultiMenu "Ground Screws", "", ""
  AddMultiMenu "Ground Screw Install Tools", "", ""
  ' AddMultiMenu "Ground Screw Kits", "", ""
  AddMultiMenu "Fittings & Accessories", "", ""
  EndMultiMenu
  
Else
  Response.Write("<a href=""products.asp?cmd=cat"">Browse Products</a>")
End If
%>