I am currently running into an issue where I have a very simple delete command. I Get a 438 error "Object doesn't support this property or method"

Any suggestions for how to resolve this error would help. I have successfully used similar commands in VBA but this particular function seems to be giving me issues.

Sub DeleteFile()

Dim eVault              As EdmVault5

Dim FolderPath          As String

Dim FilePath            As String

Dim eFile               As IEdmFile5

Dim eFolder             As IEdmFolder5

    Set eVault = New EdmVault5

    eVault.LoginAuto "_EngVault", 0

    FolderPath = "C:\_EngVault\USER_PROTOTYPE\FSIDHVA"

    FilePath = FolderPath & "\assy.SLDASM"

    Set eFolder = eVault.GetFolderFromPath(FolderPath)

    Set eFile = eVault.GetFileFromPath(FilePath, eFolder)

    eFolder.DeleteFile 0, eFile, True

End Sub