国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > ASP > 正文

利用fso顯示文件夾中的內容

2024-05-04 11:05:51
字體:
來源:轉載
供稿:網友
利用fso顯示文件夾中的內容,包括子文件夾和文件名
<HTML>
<HEAD><TITLE>fso顯示文件夾內容(子目錄和文件)</TITLE></HEAD>
<style>
body {font-size:12px;margin-top:20px;margin-left:20px;}
</style>
<BODY>
<%
'創建一個FileSystemObject對象的事例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
'創建一個Folder對象
foldername=server.mappath("./")
Set MyFolder=MyFileObject.GetFolder(foldername)
i=0
'循環顯示其中文件夾
response.write "顯示文件夾:"
For Each thing in MyFolder.subfolders
Response.Write("<br>"&thing)
i=i+1
Next
response.write "<br>共有"&i&"個文件夾"

response.write "<p>顯示文件名"
'循環顯示其中文件
i=0
For Each thing in MyFolder.Files
Response.Write("<br>"&thing)
i=i+1
Next
response.write "<br>共有"&i&"個文件"
%>
</Body>
</HTML>
發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
主站蜘蛛池模板: 朝阳县| 长岭县| 江华| 育儿| 邻水| 喀喇| 多伦县| 博野县| 卓资县| 固原市| 闻喜县| 临朐县| 西和县| 定襄县| 永新县| 云浮市| 安塞县| 昌宁县| 商城县| 汤原县| 吉木萨尔县| 左权县| 体育| 包头市| 双柏县| 靖江市| 措勤县| 托克托县| 仁怀市| 涞水县| 青浦区| 庆安县| 大名县| 印江| 农安县| 静乐县| 信丰县| 通城县| 克什克腾旗| 杭锦后旗| 九寨沟县|