ebDos (constant)

Description Used with the AppType or FileType functions to indicate a DOS application.
Comments This constant is equal to 1.
Example This example detects whether a DOS program was selected.
Sub Main()
  s$ = OpenFilename$("Run","Programs:*.exe")
    If s$ <> "" Then
    If FileType(s$) = ebDos Then
      MsgBox "You selected a DOS exe file."
    End If
  End If
End Sub
See Also AppType (function)