GetAttr Function |
GetAttr(Name$)
Returns the attributes for file Name$. If the file does not exist then a run-time error occurs.
Parameter |
Description |
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