Используя приведенный ниже код для загрузки файла в мое местоположение FTP, но я получаю следующую ошибку:
Я проверил расположение / имя пользователя и пароль FTP с помощью FileZilla, и все работает нормально, а также я могусоздать файл вручную в Filezilla.Поэтому я не считаю, что проблема с правами.
Удаленный сервер вернул ошибку: (550) Файл недоступен (например, файл не найден, нет доступа)
Sub FTPFileUpload()
Dim sFTPSaveLoc As String, sLocalSysFilePath As String
sLocalSysFilePath = "D:/9100.txt"
sFTPSaveLoc = "ftp://MyFTPIPAddressHere/ftp/DB/9100.txt"
My.Computer.Network.UploadFile(sLocalSysFilePath, sFTPSaveLoc, "FTPUserIDHere", "FTPPasswordHere")
End Sub
Любое предложение будет очень полезным.