主頁 > 知識(shí)庫 > asp遍歷站點(diǎn)所有文件夾的代碼

asp遍歷站點(diǎn)所有文件夾的代碼

熱門標(biāo)簽:常用地圖標(biāo)注范圍點(diǎn) 離線電子地圖標(biāo)注軟件注冊 辦理400電話一年多少錢 為什么外呼系統(tǒng)需要預(yù)存話費(fèi)呢 蘭州智能語音電銷機(jī)器人功能 咸陽銷售外呼系統(tǒng) 企數(shù)外呼系統(tǒng)能用多久 外呼回?fù)芟到y(tǒng)圖片 寧夏怎么申請400電話
!-- 遍歷站點(diǎn)所有文件夾 -->  
style>  
!--  
body{font-size:12px;}  
-->  
/style>  
script language="vbscript">  
!--  
sub fsubmit()  
form1.submit  
End sub  
-->  
/script>  
form name="form1" method="post" action="findfolder.asp">  
select size="1" name="fpath" onchange="fsubmit()">  
option value="0" selected>--請選擇--/option>  
option value="/">整個(gè)站點(diǎn)/option>  
option value=".">當(dāng)前目錄/option>  
%  
Dim fso,objfolder,objfile,strpath  
set fso=server.createobject("Scripting.FileSystemObject")  

strpath="."  
call bl(strpath)  

function bl(strpath)  
set objfolder=fso.getfolder(server.mappath(strpath))  

for each objsubfolder in objfolder.subfolders  
Response.write "option value='"  strpath  "\"  objsubfolder.name  "'>"  replace(strpath,".","")  "\"  objsubfolder.name  "/option>"  
call bl(strpath  "\"  objsubfolder.name)  
next  

End function  
%>  
/select>  
/form>  

%  
fpath=Request.form("fpath")  

if fpath>"0" and fpath>Empty then  

Response.write "font color=""#FF0000"">當(dāng)前文件夾:"  replace(fpath,".","")  "/font>br>br>"  

set objfolder=fso.getfolder(server.mappath(fpath))  

for each objsubfolder in objfolder.subfolders  
Response.write "子文件夾名稱:"  objsubfolder.name  "br>"  
next  

Response.write "br>"  

for each objfile in objfolder.files  
Response.write "文件名稱:"  objfile.name  "br>"  
next  

set objfolder=nothing  

End if  
%> 
您可能感興趣的文章:
  • js+FSO遍歷文件夾下文件并顯示
  • asp.net遍歷目錄文件夾和子目錄所有文件
  • php 遍歷顯示文件夾下所有目錄、所有文件的函數(shù),沒有分頁的代碼
  • php實(shí)現(xiàn)的遍歷文件夾下所有文件,編輯刪除
  • 使用PHP遍歷文件夾與子目錄的函數(shù)代碼
  • 深入探討:linux中遍歷文件夾下的所有文件
  • PHP遍歷某個(gè)目錄下的所有文件和子文件夾的實(shí)現(xiàn)代碼
  • php遍歷目錄與文件夾的多種方法詳解
  • c#遞歸遍歷文件夾示例
  • C++遍歷文件夾獲取文件列表

標(biāo)簽:昆明 溫州 鐵嶺 咸陽 家電維修 昌都 麗江 泰州

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《asp遍歷站點(diǎn)所有文件夾的代碼》,本文關(guān)鍵詞  asp,遍歷,站點(diǎn),所有,文件夾,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《asp遍歷站點(diǎn)所有文件夾的代碼》相關(guān)的同類信息!
  • 本頁收集關(guān)于asp遍歷站點(diǎn)所有文件夾的代碼的相關(guān)信息資訊供網(wǎng)民參考!
  • 推薦文章