Programming Reference Manual

WhichError

 
Syntax
 
WhichError
 
Description
Returns a Integer containing the error code for the latest Fast File operation.
 
See Also
DOSError, FCreate, FOpen, and other F... functions.
Example
 
Sub Main
   Dim Hnd%, rec&, Result%
   Hnd% = FOpen(“C:\MYDBASE.DAT”, 0, 4)
                                 ‘read-only, shared
   Result% = WhichError()
   If Result% > 0 Then
      Debug.print "File could not be opened, error code: " & Result%
   Else
      Debug.Print FLof(Hnd%)
      FClose Hnd%
   End If
 
End Sub