Module
Contents
Index 🔎︎

# SetAttr Statement

為指定的檔案設定屬性資訊。

## 語法：

    SetAttr FileName As String, Attribute As Integer

## 參數：

FileName：要進行屬性測試的檔案之名稱 (包含路徑)。如果未輸入路徑，SetAttr 將在目前目錄中搜尋該檔案。也可以使用 URL 表示法。

Attribute：用於定義要設定或清除的屬性之位元型樣：

值

Named constant | Value | Definition
ATTR_NORMAL | 0 | Normal files.
ATTR_READONLY | 1 | Read-only files.
ATTR_HIDDEN | 2 | Hidden file

您可以透過邏輯「或」陳述式來組合各值，以設定多個屬性。

## 錯誤代碼：

5 無效的程序呼叫

53 找不到檔案

70 存取遭拒

## 示例：

    Sub ExampleSetGetAttr

     On Error Goto ErrorHandler REM 定義錯誤處理程式的目標

     If Dir("C:\test",16)="" Then MkDir "C:\test"

     If Dir("C:\test\autoexec.sav")="" Then FileCopy "c:\autoexec.bat", "c:\test\autoexec.sav"

     SetAttr "c:\test\autoexec.sav" ,0

     FileCopy "c:\autoexec.bat", "c:\test\autoexec.sav"

     SetAttr "c:\test\autoexec.sav" , ATTR_READONLY

     Print GetAttr( "c:\test\autoexec.sav" )

     End

    ErrorHandler:

     Print Error

     End

    End Sub