However, if you are using asp classic, you will need some additional more coding. This is one way of doing it:
dim vUrl, arrStr, vStr
vUrl = Request.ServerVariables("PATH_INFO")
arrStr = Split(vUrl, "/")
vStr = "/"
for loopCnt = 0 to UBound(arrStr) - 1
if Len(vStr) > 1 then
vStr = vStr & "/"
vStr = vStr & arrStr(loopCnt)