1.Ist Invoke Microsoft Scripting Runtime Reference in Our Project(in Code)
2.In Declaration Part
ex : dim fs as new FileSystem
3.
' ex: FilePath and name app.path & "Filename"
if fs.fileexists(app.path & "1.jas") then
msgbox("File Found")
else
msgbox("File Not Found")
endif
Thanking U
- R.Jayaprakash