Hej
Har nedenstående brødkrummesti funktion, men hvis jeg nu gerne vil have en
mappe der hedder sØg eller Åberg eller Æske, hvordan viser jeg så ÆØÅ -
mappen/funktionen kan jo ikke hedde/vise det ...
nogen der kan hjælpe ..
TIA
<%
Function BreadCrumbs()
Dim lstrPathAry
Dim llngMaxIndex
Dim lstrPath
Dim lstrHTML
lstrPathAry = Split(Request.ServerVariables("PATH_INFO"), "/")
llngMaxIndex = UBound(lstrPathAry) - 1
lstrHTML = "<B>Du er her:</B> "
lstrPath = "/"
lstrHTML = lstrHTML & "<A href=""" & lstrPath & """>Forside</A> "
For llngIndex = 1 To llngMaxIndex
lstrPath = lstrPath & Server.URLPathEncode(lstrPathAry(llngIndex)) & "/"
lstrHTML = lstrHTML & "> <A href=""" & lstrPath & """>" &
Server.HTMLEncode(lstrPathAry(llngIndex)) & "</A>"
Next
BreadCrumbs = lstrHTML
End Function
%>