噹噹全新正版圖書,9周年店慶,**銷售,全場免運費!
fso中有個方法是createfolder,但是這個方法只能在其上一級資料夾存在的情況下建立新的資料夾,所以我就寫了乙個自動建立多級資料夾的函式,在生成靜態頁面等方面使用非常方便.
函式:
' --------------------------------
' 自動建立指定的多級資料夾
' strpath為絕對路徑
' 引用請保留版權
' by im286_anjer
' 2005-4-3
function autocreatefolder(strpath) ' as boolean
on error resume next
dim astrpath, ulngpath, i, strtmppath
dim objfso
if instr(strpath, "/") <=0 or instr(strpath, ":") <= 0 then
autocreatefolder = false
exit function
end if
set objfso = server.createobject("scripting.filesystemobject")
if objfso.folderexists(strpath) then
autocreatefolder = true
exit function
end if
astrpath = split(strpath, "/")
ulngpath = ubound(astrpath)
strtmppath = ""
for i = 0 to ulngpath
strtmppath = strtmppath & astrpath(i) & "/"
if not objfso.folderexists(strtmppath) then
' 建立
objfso.createfolder(strtmppath)
end if
next
set objfso = nothing
if err = 0 then
autocreatefolder = true
else
autocreatefolder = false
end if
end function
呼叫方法:
mypath = "c:/a/b/c/"
if autocreatefolder(mypath) then
response.write "建立資料夾成功"
else
response.write "建立資料夾失敗"
end if
MVC 在Views的多級資料夾
在mvc裡,你的控制器對應的檢視一般是在views目錄,而如果希望在views裡再分幾個模組資料夾預設是不允許的,我們需要做一下設定,就可以實現views下的多次資料夾層次了,例如,我們有產品模組,使用者模組,訂單模組,我們就可以把它的資料夾結構設計成如下 使用者模組 views usermodel...
asp建立資料夾的函式
建立資料夾的函式2 sub createfolder strfolder,ifok 首選判斷要建立的資料夾是否已經存在 dim strtestfolder,objfso if ifok then strfolder strfolder end if set objfso createobject s...
asp讀取資料夾中的檔案
for each item in mydir.files 依次讀取web目錄下的每個檔案物件 dname item.path 讀取每個檔名的完整路徑和檔名 htmfile replace dname,mydir 將路完整檔案和名徑中的目錄名替換掉,保留下來的就是純檔名 response.write ...