获取当前页面完整的地址

获取当前页面完整的地址
url=Lcase("http://"&Request.ServerVariables("server_name")&Request.ServerVariables("path_info"))