主题:  include路径问题

thousy

职务:普通成员
等级:1
金币:0.0
发贴:15
注册:2002/7/6 16:54:10
#12002/12/1 16:52:51
把相同的部分象是统一的页面logo,版权声明等做成一个过程,然后放到一个include文件中,这样所有的页面就都可以使用,但这样就存在一个问题,如果使用绝对路径,移植时就很麻烦,如开发试一般不使用域名,而实际使用时就要进行改动,但如果不用绝对路径的话,根目录和子目录中调动这个过程的时候就有个路径问题,举个例子,图片都放在images目录中,在根目录中调用时用"images/xxx.gif"
,在一级子目录中就要用"../images/xxx.gif"...,那么怎么解决这个问题呢



缺缺

职务:管理员
等级:8
金币:41.0
发贴:9620
注册:2004/1/14 19:14:47
#22002/12/1 17:23:54
不使用绝对路径有什么问题?



thousy

职务:普通成员
等级:1
金币:0.0
发贴:15
注册:2002/7/6 16:54:10
#32002/12/2 10:04:01
刚找到的资料,用include也不成问题了。

zjaSir转载:

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

'----------------------------------------------------------------------------------

'
' function name :  GetPath()
'
' 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


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


这个是在面包论坛找到的,

但是使用的时候老是说m_strBaseDIr这个定义出毛病
请帮我看看吧




职务:管理员
等级:1
金币:11.0
发贴:901
注册:2007/10/14 21:50:03
#42002/12/2 10:37:25
用 /images/xxx.gif



thousy

职务:普通成员
等级:1
金币:0.0
发贴:15
注册:2002/7/6 16:54:10
#52002/12/2 14:04:53
对不起,能不能说清楚点?!



thousy

职务:普通成员
等级:1
金币:0.0
发贴:15
注册:2002/7/6 16:54:10
#62002/12/2 14:06:06
技术信息(适用于支持人员)

错误类型:
Microsoft VBScript 编译器错误 (0x800A0408)
/top.asp, 第 12 行, 第 28 列
dim m_intLoop , m_strBaseDIr  
---------------------------^


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)

页:
GET /top.asp

编辑历史:[这消息被thousy编辑过(编辑时间2002-12-02 14:06:37)]