ASP編程入門進階（2）：FSO組件之檔案夾操作

操作完磁碟機，接著就是來操作檔案夾了。其中包括：提取檔案夾資訊、建立檔案夾、刪除檔案夾、複製檔案夾、移動檔案夾等。下面就具體來看。

一、fso.GetFolder

一看就明白，是提取檔案夾了。那具體是提取哪個檔案夾呢？後面肯定要跟一個檔案夾的路徑。提取出來了再來顯示該檔案夾相關資訊呢？是不是有要具體提取下去。所以，看程式：

1，getfldr.asp

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set fldr = fso.GetFolder("c:\Program Files")
Response.Write "父資料夾名字是：" & fldr & "<br>"
If fldr.IsRootFolder = True Then
　 Response.Write "該檔案夾是一根資料夾" & "<br>"
Else
　 Response.Write "該檔案夾不是根資料夾" & "<br>"
End If
Response.Write "磁碟機名字是：" & fldr.Drive & "<br>"
%>

首先建立FSO組件的串連是必不可少的啦，然後Set fldr = fso.GetFolder("c:\Program Files")設定fldr對象被賦值，以作下面程式的引用。

fldr.IsRootFolder即為判斷該檔案夾是否為一根資料夾，值為布爾值（true or false）；fldr.Drive則顯示該檔案夾所在的磁碟機代號了。

二、fso.CreateFolder

下面比較讓人激動的是通過ASP建立檔案夾了，你可以在你的權力範圍內任意位置建立任意檔案夾。

2，creatfldr.asp

<%
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateFolder ("c:\cnbruce")
Response.Write "檔案夾名為" & fso.GetBaseName("c:\cnbruce")
%>

執行程式，應該發現C盤多出了cnbruce檔案夾，fso.GetBaseName則是提取檔案夾名。

三、fso.DeleteFolder

通過ASP可以建立了檔案夾，則同樣可以刪除檔案夾。

3，delfldr.asp

<%
Set fso = CreateObject("Scripting.FileSystemObject")
fso.DeleteFolder("c:\cnbruce")
Response.Write "檔案夾已刪除"
%>