Get File name from URL Path - ASP Classic

The following VBScript function can be used in an ASP legacy application to extract the file name from a request.

public function GetFileName()
    dim files, url, segments

    'get then current url from the server variables
    url = Request.ServerVariables("path_info")

    segments = split(url,"/")

    'read the last segment
    url = segments(ubound(segments))
    GetFileName = url
end function 

The function returns the last segment of the path information or URL. These are some examples:

URL	File Name
http://mydomain/products/default.asp	Default.asp
http://mydomain/products/	The default page in that directory(check web server settings)
http://mydomain/default.asp	Default.asp

This is useful when there is the need of an application rule associated to the file name. For example, a new rule may need to be created on your legacy application because robots are exploiting a security hole in your application. You may want to protect some pages that can be used to update information , and you want to add a security policy to only those pages. This function can be used to know the target page on the request and apply the security rule if the page has been configured to be protected.

I hope this is useful to someone.

Thanks.
CodeProject