0

我在从 FTP 服务器删除文件时遇到问题(如果存在),下面是我的代码的真正精简版本,但通常 inFile 是一个变量。理论上,下面的代码应该从 FTP 服务器中删除文件 test.txt,因为它确实存在,但似乎没有任何反应。如果我在其中创建一个包含 test.txt 文件的本地目录并将 inFile 指向该目录,则该文件会很好地删除,因此我假设它与远程连接有关。有任何想法吗?

inFile = "ftp://username:password@xxx.xxx.xxx.xxx/test.txt"

File_Delete(inFile)

Sub File_Delete (inFile)

            dim strProc, objFSO

            Set objFSO = CreateObject("Scripting.FileSystemObject")

            If objFSO.FileExists(inFile) Then
                            objFSO.DeleteFile infile                                                
            end if

            set objFSO = nothing


end sub
4

0 回答 0