Module
Contents
Index 🔎︎

# GetAttr Function

Trả về một mẫu bit mà nhận dạng kiểu tập tin, hoặc tên của một khối tin hoặc thư mục.

## Cú pháp:

    GetAttr (Text As String)

## GIá trị trả về:

Số nguyên

## Tham số :

Văn bản: bất cứ biểu thức chuỗi nào mà chứa một đặc tả tập tin không mơ hồ. Bạn cũng có thể sử dụng kiểu ghi URL.

Hàm này xác định các thuộc tính cho một tập tin đã ghi rõ, và trả về mẫu bit có thể giúp bạn nhận dạng các thuộc tính tập tin này:

## Error codes:

5 Sai gọi thủ tục

53 Không tìm thấy tập tin 53 Không tìm thấy tập tin 53 Không tìm thấy tập tin 53 Không tìm thấy tập tin 53 Không tìm thấy tập tin 53 Không tìm thấy tập tin

## Giá trị

Named constant | Value | Definition
ATTR_NORMAL | 0 | Normal files.
ATTR_READONLY | 1 | Read-only files.
ATTR_HIDDEN | 2 | Hidden file
ATTR_SYSTEM | 4 | System file
ATTR_VOLUME | 8 | Returns the name of the volume
ATTR_DIRECTORY | 16 | Returns the name of the directory only.
ATTR_ARCHIVE | 32 | File was changed since last backup (Archive bit).

Muốn biết nếu thuộc tính có một bit đã đặt thì dùng phương pháp truy vấn này:

## Thí dụ :

    Sub ExampleSetGetAttr

    On Error Goto ErrorHandler REM Define target for error-handler

     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" ,1

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

     End

    ErrorHandler:

     Print Error

     End

    End Sub