") mystring = ucase("SDSU IV Campus" & Request.ServerVariables("PATH_INFO")) string_address=Replace(Request.ServerVariables("PATH_INFO"),"/","",1,1) link_string="" temp_string="" final_string="" mystring_len= len(mystring) position = InStr(mystring,"/") position_address=InStr(string_address,"/") while ( position > 1 ) temp_string = left(mystring,position-1) if ( position_address>1 ) then temp_string_address=left(string_address,position_address-1) final_string = final_string & ""& ""&Replace(temp_string,"_"," ")&""& " / "&"" link_string=link_string & "/" & temp_string_address mystring_len= mystring_len - len(temp_string) mystring = right(mystring,mystring_len-1) position = InStr(mystring,"/") wend %> <%=final_string%> <% response.write(" | ") %>
Photo Gallery
Exchange Students
Exchange Programs
|
Paraguay
1999
|
|
England
2000
|
|
Spain
2000
|
|
Portugal
2001
|
|
Germany
2002
|
|
France
2003
|
|
Ecuador
2003
|
Costa Rica 2005 |
Spain 2005 |
France 2005 |
Spain 2006 |
|
China 2006
|