FileAttr Function

Syntax:
FileAttr(StreamNum, ReturnValue)
Group: File
Description:
Return StreamNum's open mode or file handle.
Parameter 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.
Example:

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