博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

asp获取当前文件在服务器上的全路径收藏

Posted on 2009-03-16 16:43  ^_^木头人  阅读(192)  评论(0)    收藏  举报

 

'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)