<%
Dim dire
dire= Server.MapPath("/") 'response.write("sever的根目录的路径<p>")
response.write(dire)
response.write("<p>")
dire= Server.MapPath(".") '本文档所在的当前目录的路径
response.write(dire)
response.write("<p>")
dire= Server.MapPath("/admin/images") '从web server根目录开始的相对路径
response.write(dire)
response.write("<p>")
dire=server.MapPath(request.ServerVariables("Path_Info")) '返回当前文件路径
response.write(dire)
response.write("<p>")
dire=Request.ServerVariables("Path_Translated") '返回当前文件路径
response.write(dire)
response.write("<p>")
%>