Attributes

Attributes屬性設定或返回檔案或資料夾的屬性。可讀寫或唯讀(與屬性有關)。

object.Attributes [= newattributes]

參數object

必選項。應為 FileFolder 對象的名稱。

基本介紹

  • 中文名:Attributes
  • 屬性:返回檔案或資料夾的屬性。
  • 參數:object
  • 必選項:應為 File 或 Folder 對象名稱
定義,合理組合,

定義

newattributes
可選項。如果指定此參數,則 newattributes 為指定的 object 的屬性的新值。
asdf

合理組合

設定newattributes 參數可為下列設定之一或下列設定的合理組合:
常數
描述
Normal
0
普通檔案。沒有設定任何屬性。
ReadOnly
1
唯讀檔案。可讀寫。
Hidden
2
隱藏檔案。可讀寫。
System
4
系統檔案。可讀寫。
Directory
16
資料夾或目錄。唯讀。
Archive
32
上次備份後已更改的檔案。可讀寫。
Alias
1024
連結或捷徑。唯讀。
Compressed
2048
壓縮檔案。唯讀。
說明忽略對唯讀屬性(別名,壓縮或目錄)所作的改變.
當設定屬性時,應首先閱讀當前屬性,然後按要求改變個別屬性,最後反寫屬性.
以下代碼舉例說明如何使用 Attributes 屬性:
Function ToggleArchiveBit(filespec)
Dim fso, f
Set 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 If
End Function

相關詞條

熱門詞條

聯絡我們