Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

AspFtp - Passive Mode не работает?

6.9K
24 марта 2004 года
bask
2 / / 24.03.2004
Всем привет!

До недавнего времени я пользовалься таким кодом для закачки обновлённых файлов по FTP:

Dim FTP
Set FTP = Server.CreateObject("AspFTP.Ctrl")
FTP.RemoteHost = FTP_Host
FTP.UserName = FTP_User
FTP.Password = FTP_Password
FTP.Open
FTP.ChDirLocal Local_Dir
FTP.ChDirRemote FTP_Dir
If FTP.PutFile(File_Local, File_Remote) Then
errout = 1
end if

Но пару дней назад наш сисадмин что-то поменял и теперь такой код не работает. Доступ к внутреннему FTP теперь доступен, если в настройках FTP-клиента включить Passive Mode, иначе происходит Permission Denied.

Я пробовал всавить такую строку
FTP.PassiveMode = True
Не ругается, проглатывает, но результата не видно - всё равно нет доступа для программы.
Что делать, подскажите, пожалуйста.
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог