FileExists
 
测试文件的存在

语法

Declare Function FileExists ( ByVal filename As ZString Ptr ) As Integer

用法

#include "file.bi"
result = FileExists( filename )

or

#include "vbcompat.bi"
result = FileExists( filename )

参数

filename
测试存在的文件名。

返回值

如果文件存在,返回非零(-1),否则返回零(0)。

说明

FileExists测试文件的存在。
在内部,它可能会发出一个Open()和Close()函数,这可能会产生后果 - 例如,文件中的任何现有的Lock可能被释放。
根据具体要求,检查文件存在的其他方法可能是使用Dir()功能(注意属性并确保路径不包含通配符),或尝试Open编写文件并检查返回值成功。

例子

#include "vbcompat.bi"

Dim filename As String

Print "输入文件名:"
Line Input filename

If FileExists( filename ) Then
  Print "找到的文件:" & filename
Else
  Print "文件未找到:" & filename
End If


平台差异

  • Linux需要filename 与文件的真实名称匹配。Windows和DOS不区分大小写。
  • Linux中的路径分隔符是正斜杠/ .Windows使用反斜杠\\ ,但它允许正斜杠。DOS使用反向\\ 斜杠。


与QB差别

  • 新的FreeBASIC

参考