'asp获取当前文件在服务器上的全路径
getpath_frist=split(right(request.ServerVariables("URL"),len(request.ServerVariables("URL"))-1),"/")
for ii=lbound(getpath_frist) to ubound(getpath_frist)-1
getpath_full=getpath_full&"/"&getpath_frist(ii)
next
fullurlpath="http://"&request.ServerVariables("HTTP_HOST")&getpath_full&"/"
response.Write(fullurlpath)