I had the following code working perfectly fine on my pc.
sDir = "E:\AppDev\FTP\Caspio"
StrFile = Dir(sDir & "*" & sFileStr & "*")
Do While Len(StrFile) > 0 And Not IsFileOpen(sDir & StrFile)
However when placing it into the server it always returning an empty string.
Folder above contains many files (on that server).