我在从 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