以簡介過 目錄的建立，刪除，複製，移動，檢查存在與否等。
以下介紹，取得目錄下的子目錄，和檔案及目錄的基本屬性。
DirectoryInfo 類別
命名空間： System.IO
組件： mscorlib (在 mscorlib.dll 中)
System.IO.DirectoryInfo("目錄完整路徑")
1.取得目錄建立的日期和時間 System.IO.DirectoryInfo.CreationTime 屬性
1-1.取得上次存取此目錄的日期和時間 System.IO.DirectoryInfo.LastAccessTime 屬性
1-2.取得上次寫入此目錄的日期和時間 System.IO.DirectoryInfo.LastWriteTime 屬性
-
Dim Dir As New System.IO.DirectoryInfo("c:\test")
-
MsgBox(Dir.CreationTime) '建立此目錄的時間
-
MsgBox(Dir.LastAccessTime) '上次存取此目錄的時間
-
MsgBox(Dir.LastWriteTime) '上次寫入此目錄的時間
複製代碼
2.DirectoryInfo.GetDirectories 方法， 傳回目前目錄的子目錄。
.GetDirectories("設定要搜尋的目錄條件字串", 設定搜尋時是否包含目錄下的子目錄)
要搜尋的目錄條件字串
"*"(搜尋所有子目錄)
"System*"(所有以System字串開頭的目錄)
"*Test"(所有以Test做為結尾目錄)
"*Add*"(所有中間含有Add字串的目錄)。
-
Dim Dir As New System.IO.DirectoryInfo("c:\test")
-
'取得"C:\test"下所有目錄，不包含子目錄內的目錄
-
For Each TempDir As IO.DirectoryInfo In Dir.GetDirectories
-
MsgBox(TempDir.Name)
-
Next
-
-
'取得"C:\test"下所有目錄，包含子目錄內的目錄
-
For Each TempDir As IO.DirectoryInfo In Dir.GetDirectories("*", IO.SearchOption.AllDirectories)
-
MsgBox(TempDir.Name)
-
Next
-
-
'取得"C:\test"下所有目錄，包含子目錄內的目錄，且目錄名稱以 System為開頭的目錄。
-
For Each TempDir As IO.DirectoryInfo In Dir.GetDirectories("System*", IO.SearchOption.AllDirectories)
-
MsgBox(TempDir.Name)
-
Next
複製代碼
3.DirectoryInfo.GetFiles方法， 傳回目前目錄的檔案。
.GetFiles("設定要搜尋的檔案條件字串", 設定搜尋時是否包含目錄下的子目錄)
要搜尋的檔案條件字串例
"*.txt"(所有副檔名為 txt 的檔案)
"*.*"(所有的檔案)
-
Dim Dir As New System.IO.DirectoryInfo("c:\test")
-
'搜尋所有副檔名為 jpg 的檔案
-
For Each TempFile As IO.FileInfo In Dir.GetFiles("*.jpg")
-
MsgBox(TempFile.Name)
-
Next
-
-
'搜尋所有副檔名為 jpg 的檔案，包含目錄內所有的子目錄
-
For Each TempFile As IO.FileInfo In Dir.GetFiles("*.jpg", IO.SearchOption.AllDirectories)
-
MsgBox(TempFile.Name)
-
Next
-
-
'取得所有副檔名為 jpg 的檔案，且檔案名稱以 Image 開頭的檔案
-
For Each TempFile As IO.FileInfo In Dir.GetFiles("Image*.jpg")
-
MsgBox(TempFile.Name)
-
Next
複製代碼
已上是本人於2009 整理於 VB研究小站 之 NCIS資訊中心討論區
轉貼過來。
====================================================
有些事就該把它當作一種回憶...
一種放在記憶中任隨時間慢慢的侵蝕慢慢的隨風漂泊........
===================================================
~~~請支持 點部落 格，點點下方的廣告吧~~~
