Attributes

Attributes屬性設定或返回檔案或資料夾的屬性。可讀寫或唯讀(與屬性有關)。
object.Attributes [= newattributes]
參數object
必選項。應為 FileFolder 對象的名稱。
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

相關詞條

相關搜尋

熱門詞條

聯絡我們