<%
nowURL=request.ServerVariables("PATH_INFO")
q_str=""
for each q_var in request.querystring
if q_str<>"" then '如果有其他querystring变量,则添加连接符
q_str=q_str & "&"
end if
q_str = q_str & Server.URLEncode(q_var) & "=" & Server.URLEncode(request.querystring(q_var))
next
if q_str<>"" then
nowURL=nowURL & "?" & q_str
end if
%>
经过这段代码,nowURL就是了。废话不说,给分吧。