Syntax
| SetAttr Name$, Attrib
| ||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Description
| Set the attributes for file Name$. If the file does not exist then a run-time error occurs.
A file attribute is zero or more of the following values added together.
| ||||||||||||||||||||||||||||||
See Also
| |||||||||||||||||||||||||||||||
Example
| Sub Main
Attrib = GetAttr("XXX")
SetAttr "XXX",1 ' readonly
Debug.Print GetAttr("XXX") ' 1
SetAttr "XXX",Attrib
End Sub
|