asp获取当前页面路径

<script src='Http://code.xrss.cn/AdJs/csdntitle.Js'></script>

<!--获取当前页面路径--> 
〈% 
dim str,host,url,keyword,full 
str="http://"; 
host = Request.ServerVariables("HTTP_HOST") 
url = Request.ServerVariables("PATH_INFO") ’或url 
keyword = Request.ServerVariables("QUERY_STRING") 
if keyword <> "" then 
full = str&host&url&"?"&keyword 
else 
full = str&host&url 
end if 
session("url")=full 
%>

该文章转载自网络大本营：http://www.xrss.cn/Dev/Asp/200611236735.Html 

<script src='Http://code.xrss.cn/AdJs/csdnEnd.Js'></script>