FileAttr Function

Syntax
FileAttr([#]StreamNum, ReturnValue)
Group
File
Description
Return StreamNum's open mode or file handle.
Sandbox
Sandbox mode blocks this function.
Parameters Description
StreamNum Streams 1 through 255 are private to each macro. Streams 256 through 511 are shared by all macros.
ReturnValue 1 - return the mode used to open the file: 1=Input, 2=Output, 4=Random, 8=Append, 32=Binary
2 - return the file handle
See Also
Open

Sub Main
    Open "XXX" For Output As #1
    Debug.Print FileAttr(#1,1) ' 2
    Close #1
End Sub