三条语句搞定路径

新客网 XKER.COM 2003-04-15 来源： 收藏本文

很多人喜欢把一个网站中相同的部分象是统一的页面logo，版权声明等做成一个过程，然后放到一个include文件中，这样所有的页面就都可以使用，但这样就存在一个问题，如果使用绝对路径，移植时就很麻烦，如开发试一般不使用域名，而实际使用时就要进行改动，但如果不用绝对路径的话，根目录和子目录中调动这个过程的时候就有个路径问题，举个例子，图片都放在images目录中，在根目录中调用时用"images/xxx.gif" ，在一级子目录中就要用"../images/xxx.gif"...，那么怎么解决这个问题呢，看下面这个函数

'----------------------------------------------------------------------------------
'
' function name : GetPaht()
'
' description: 解决不同目录中的路径问题
'
' parameters: none
'
' date: 2000/3/25
'
' author: LiuYunpeng
'
' History: 2000/3/25 version 1.0
'
'---------------------------------------------------------------------------------

function GetPath()
dim m_intLoop , m_strBaseDIr
for m_intLoop = 2 to ubound(split(Request.ServerVariables ("SCRIPT_NAME"),"/" )) - 1
m_strBaseDir = m_strBaseDir + "../"
next
GetPath = m_strBaseDir
end function


这是就可以这样写图片路径
<img src="&GetPath()+'Images'&"/xxx.gif>，这样的话无论在多少级子目录中都不用担心路径问题了。

• ·ASP+ACCESS数据库中文乱码问题解决
• ·编程实例 字母+数字验证码程序
• ·ASP连接数据库错误解决办法新法
• ·初学:ASP内建对象Response
• ·ASP网站Server object error的解决办法
• ·ASP技巧：让Len,Left,Right函数识别中文
• ·把网页中的电话号码生成图片的ASP程序
• ·ASP如何实现IE地址栏参数的判断
• ·细化解析：ASP连接11种数据库语法集锦
• ·ASP实现网页打开任何类型文件都保存
• ·ASP代码直接增加、删除ACCESS表和字段
• ·ASP：判断访问是否来自搜索引擎的函数
• ·ASP技巧：禁用页面缓存的五种方法
• ·学习ASP关于与变量子类型相关的函数
• ·ASP开发中的(VBScript)类基础学习
• ·ASP访问Excel文件