GetAttr Function

Syntax
GetAttr(Name$)
Group
File
Description
Return the attributes for file Name$. If the file does not exist then a run-time error occurs.
Sandbox
Sandbox mode blocks this function.
Parameters Description
Name$ This string value is the path and name of the file. A path relative to the current directory can be used.

Sub Main
    F$ = Dir$("*.*")
    While F$ <> ""
        Debug.Print F$; " "; GetAttr(F$)
        F$ = Dir$()
    Wend
End Sub