dim fso set fso = CreateObject("Scripting.FileSystemObject") if fso.FileExists("C:\Users\Administrator\Desktop\3.txt") then msgbox("目标文件存在") else msgbox("目标文件不存在") end if set fso = nothing 复制代码
dim fso set fso = CreateObject("Scripting.FileSystemObject") if fso.FileExists("C:\Users\Administrator\Desktop\3.txt") then msgbox("目标文件存在") else msgbox("目标文件不存在") end if set fso = nothing