FileSystemObject is lying!

[drkestrel]

I am using the following code to check to see if a text file exists.

Log

is a subroutine I wrote that logs a message to a log file.
The code jumps into the If statement to indicate that the file does not exist, although if I open up the log file or look at the message box, I could manually open up the file, whose full path is stored in the variable

strInfoFilePath

and I can also do DIR command from a command prompt on that file. Why does the

FileSystemObject

think the file does not exist??

The file was created from

FileSystemObject

using the

OpenTextFile

command with a create=True from another script and that file was also closed first.

Dim objFileSystemObject, strInfoFilePath

strInfoFilePath = PACKAGEFILE_DIR & "\" & INFO_FILE

Set objFileSystemObject = CreateObject("Scripting.FileSystemObject")

'First check to see if the INFO_FILE exists    
If Not objFileSystemObject.FileExists(strInfoFilePath) Then
    Call Log(strInfoFilePath & " not found.")
    Call MsgBox(strInfoFilePath & " not found.")
End If

 

[FesterSXS]

Does the full path you refer to include the drive letter?


Tony

http://www.SpiraxSarco.com/cad

 

[drkestrel]

Just find out that strInfoFilePath has not been initialised properly