API函數(shù) PathFileExists
聲明
Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
PathFileExists("一個文件或文件夾") 如果存在 返回1 不存在返回0
If PathFileExists("C:\123") then ...
Dir不準確
如果有下列
目錄結(jié)構(gòu)D
盤中有文件夾 test 文件夾中有testFile.txt文件
還有空文件夾 testEmpty
則
Dir("d:\test\testFIie.txt") 返回 testFile.txt
Dir("d:\test\testFIie11111111.txt") 返回 ""
Dir("d:\test\") 返回 testFile.txt (返回此文件夾第一個文件)
Dir("d:\testEmpty") 返回空
dir("一個不存在的文件夾")返回空
也就是說如果一個文件夾下沒有文件（不管有沒有子文件夾）則 dir("一個文件夾")就返回空
所以不能通過 dir("一個文件夾")來判斷一個文件夾是否存在。
只能調(diào)用api
函數(shù)Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
PathFileExists("一個文件或文件夾") 如果存在 返回1 不存在返回0
