Application.filesearch - Access Runtime problem
Posted on 2003-11-20
In my application, I have the following codes:
Dim strNotePadFile as string, ii as interger
.LookIn = "C:\"
.SearchSubFolders = True
.filename = "Notepad.exe"
If .Execute() > 0 Then
MsgBox "There were " & .FoundFiles.Count & _
" file(s) found."
ii = .FoundFiles.Count
strNotePadFile = .FoundFiles(ii) 'return the path of the last one found
MsgBox "There were no files found."
It works fine in my development computer. However, when I install the application to another computer and runs the application with Access Runtime, the Application.filesearch.execute fails.
how do I fix this?