One thing that always bothered me about Classic ASP is that there isn't an easy way to get the entire url. So I devised a function that will get the full path including the query string. (Note I did not write this taking https into consideration but that could be added on to my code if need be.
function GetPath()
query_string = request.ServerVariables("QUERY_STRING")
if query_string <> "" then
query_string = "?" & query_string
end if
GetPath = "http://" & request.ServerVariables("SERVER_NAME") & request.ServerVariables("URL") & query_string
end function