Что нового

[Автоматизация] Работа с ftp на Windows 2003 Server

ulan44

Знающий
Сообщения
55
Репутация
8
Добрый день комрады.
В общем такая проблема с работой ftp на Windows 2003. Есть скрипт который берет файл из папки и закачивает его на удаленный ftp.


Код:
#Include <FTPEx.au3>

$server = "ip_server"
$login = "admin"
$password = "******"

$filepath = @ScriptDir&"\file.txt"
$ftppath = "/www/scripts/file/file.csv"

$hOpen = _FTP_Open('FTP')
If not $hOpen Then
	MsgBox(0, "Передача файла", "Не могу открыть фтп сессию")
    Exit
EndIf

$hConn = _FTP_Connect($hOpen, $server, $login, $password)
If not $hConn Then
	MsgBox(0, "Передача файла", "Не могу подключиться к ftp серверу")
    Exit
EndIf

If not _FTP_FilePut($hConn, $filepath, $ftppath) Then
	MsgBox(0, "Передача файла", "Не могу закачать файл на ftp сервер" & @CRLF & "Файл отсутствует или к нему нету доступа")
    Exit
EndIf
_FTP_Close($hOpen)


При этом скрипт я проверял на работоспособность в Windows 7 файл закачивается нормально, но при переносе на Windows 2003 уже от компилированный скрипт на проч отказывается закачивать файл на сервер. Может кто сталкивался с такой проблемой ?
Еще раз повторюсь в Windows 7 работает, а в 2003Server отказывается заливать файл, причем если вместо передать файл сделать создать папку то папку он создает.

Решил.

В место
Код:
$hConn = _FTP_Connect($hOpen, $server, $login, $password)


Надо
Код:
$hConn = _FTP_Connect($hOpen, $server, $login, $password, 1)
 

Vinosh

Сервер не ###. Стоял и стоять будет.
Сообщения
15
Репутация
1
:laugh: Блин! Опять эта единичка я двое суток скрипт перекапывал из-за неё, теперь у меня среднеистирическое состояние с желанием убиться танцуя ибо исходник в 160 строк я заучил наизусть пока искал проблему, и всё из-за того что семёрке эта единичка была не нужна :'( :stars:
 
Верх