%@Language = VBScript %> <% Option Explicit %> <% '################################ '#FILE: popcorn_basic.asp - Version 1.2 '#REVISION HISTORY: '# 05/29/04 Version 1.2 No changes. Just keeping up with release numbers '# to other versions of this script. '# 02/22/02 Version 1.0 '# '#CONTACT INFORMATION: '# http://www.davelozinski.com/cgi-bin/email_lozinski.pl '# '#UPGRADE TO THE ADVANCED VERSION: '# http://www.davelozinski.com/scripts/popcorn_trail/ '# '# This asp script generates a "popcorn" trail on your web page. '################################ '# Just insert this code once at the top of the web page you'd like the '# "popcorn" trail displayed in Dim trail, path, x, UpperBound trail = Array() trail = Split(Request.ServerVariables("URL"),"/") UpperBound = UBound(trail) '################################ %>
-> Home -> Scripts -> Popcorn Trail -> Popcorn Code -> / -> asp_scripts -> popcorn -> popcorn_code.asp -> Home -> Scripts -> Popcorn Trail -> Popcorn Code Home | Scripts | Popcorn Trail | Popcorn Code / -> asp_scripts -> popcorn -> popcorn_code.asp / -> asp_scripts -> popcorn ->", or specify your own! And you can have a different
separator for each trail on your page! Home -> Scripts -> Popcorn Trail -> Popcorn Code Home | Scripts | Popcorn Trail | Popcorn Code -> Home -> Scripts -> Popcorn Trail -> Popcorn Code Home -> Scripts -> Popcorn Trail -> Popcorn Code