ckeck to see if a file exists

[chiefvj]

i have search the forum looking for a fileexit routine. Any ideas. thx

 

[MoLaker]

You can use the Dir() function. If the file exits, it will return the file name. If it does not exist, it will return zero-length.

Dir("c:\[i][path to the file][/i]\filename.xxx)

 

[vvrt]

Hi,
You can also use the FileSystemObject Object
Add a reference to the Microsoft Scripting Runtime object by choosing Tools > References select Microsoft Scripting Runtime and click OK
Add
Dim FSys As New FileSystemObject
If Sys.FileExists("C:\[Path to file]\[Filename].exe) Then
Do event
else

End if
This method can be faster.
you can copy files and folders move them or delete them
Look up scripting objects

Hope this help

vvrt

 

[chiefvj]

I want to run an external mdb file. what i did was to set an error check and if the event was unable to find the file an error would be generated and a message would pop up and the code would bypass any attempt to run the application. Thanks for the routine. Iwill give it a try. thx