Подскажите что я делаю не так и почему все же не работает ф-ция:
Заранее спасибо. Поиском искал, примеров так и не смог найти..
Код:
MsgBox(16,'',_FTP_PutDir($sHost, $sUsername, $sPassword, '/dir'))
Func _FTP_PutDir($sHost, $sUsername, $sPassword, $sLocalDir, $sRemoteDir = '\')
If $sHost <> '' And $sPassword <> '' And $sUsername <> '' And $sLocalDir <> '' And $sRemoteDir <> '' Then
Local $Open = _FTP_Open('')
Local $Conn = _FTP_Connect($Open, $sHost, $sUsername, $sPassword)
If $Conn Then
$vResult = _FTP_DirPutContents($Conn, $sLocalDir, $sRemoteDir, 1)
_FTP_Close($Open)
Return $vResult
Else
Return False
EndIf
Else
Return False
EndIf
EndFunc ;==>_FTP_PutDir
Заранее спасибо. Поиском искал, примеров так и не смог найти..