My Little Scripts - directory-navigation-links.asp

Scripts.com - Get the best scripts NOW!
HotScripts.com - Over 10 web rings.
more links...

DIRECTORY-NAVIGATION-LINKS.ASP

Do you have a website with a navigation system that follows its directory structure? If so, with this ASP version of directory-navigation-links.php, you can implement a navigation solution that requires very little maintenance.

see also : directory-navigation-links.php, directory-navigation-links.asp
javascript-navigation-links.js, hotlink-protection.php
link-words.php, link-words.asp

<%
function directory_navigation_links()
         directory_navigation_links = ""
         right_side_path = Request.ServerVariables("SCRIPT_NAME")
         left_side_path = ""

         do
            next_slash = instr(right_side_path, "/")

            if next_slash <> 0 then
               left_side_path = left_side_path & left(right_side_path, next_slash)
               right_side_path = right(right_side_path, len(right_side_path) - next_slash)

               if left_side_path = "/" then
                  dir_name = "home"
               else
                  dir_name = left(left_side_path, len(left_side_path) - 1)
                  dir_name = right(dir_name, len(dir_name) - inStrRev(dir_name, "/"))
               end if

               directory_navigation_links = directory_navigation_links & _
               "<a href=""" & left_side_path & """>" & dir_name & "</a> "
            end if

         loop while next_slash <> 0
end function
%>