string = UnMappath(pathname)
Example Usage:
ASP Source Code:Returns the string "/New Folder/file.asp" <% = UnMappath( server.mappath("/New Folder/file.asp") ) %>
<% Private Function UnMappath(byVal pathname) dim tmp, strRoot strRoot = Server.Mappath("/") tmp = replace( lcase( pathname ), lcase( strRoot ), "" ) tmp = replace( tmp, "\", "/" ) UnMappath = tmp End Function %>