很多人喜歡把一個網站中相同的部分象是統一的頁面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 toubound(split(Request.ServerVariables ("SCRIPT_NAME"),"/" )) - 1 m_strBaseDir = m_strBaseDir + "../" next GetPath = m_strBaseDir end function
這是就可以這樣寫圖片路徑 <img src="&GetPath()+'Images'&"/xxx.gif>,這樣的話無論在多少級子目錄中都不用擔心路徑問題了。
|