object.Attributes [= newattributes]
參數object
必選項。應為 File 或 Folder 對象的名稱。
newattributes
可選項。如果指定此參數,則 newattributes 為指定的 object 的屬性的新值。
設定newattributes 參數可為下列設定之一或下列設定的合理組合:
常數 | 值 | 描述 |
Normal | 0 | 普通檔案。沒有設定任何屬性。 |
ReadOnly | 1 | 唯讀檔案。可讀寫。 |
Hidden | 2 | 隱藏檔案。可讀寫。 |
System | 4 | 系統檔案。可讀寫。 |
Directory | 16 | 資料夾或目錄。唯讀。 |
Archive | 32 | 上次備份後已更改的檔案。可讀寫。 |
Alias | 1024 | 連結或捷徑。唯讀。 |
Compressed | 2048 | 壓縮檔案。唯讀。 |
說明忽略對唯讀屬性(別名,壓縮或目錄)所作的改變.
當設定屬性時,應首先閱讀當前屬性,然後按要求改變個別屬性,最後反寫屬性.
以下代碼舉例說明如何使用 Attributes 屬性:
Function ToggleArchiveBit(filespec)Dim fso, fSet fso = CreateObject("Scripting.FileSystemObject")Set f = fso.GetFile(filespec)If f.attributes and 32 Then f.attributes = f.attributes - 32 ToggleArchiveBit = "清空歸檔位。"Else f.attributes = f.attributes + 32 ToggleArchiveBit = "設定歸檔位。"End IfEnd Function