Hi,
habe ein seltsames problem mit den ftp-udf's.
Ich kann keine datei hochladen und weiss nicht woran es liegt,wirklich nicht....
Schon bei "_FTP_DirGetCurrent" kriege ich einen fehler...
Mit filezilla funzt alles wunderbar. Username und PW stimmen 100% überein.
Hier der code:
Func UploadFile($filename)
Local $server = 'www5.subdomain.com'
Local $username = '********'
Local $pass = '*************'
Local $cryptedFileName$cryptedFileName = _StringEncrypt(1, $filename, $cryptPW, 3)
Local $Open = _FTP_Open('MyFTP')
If $Open = 0 Then
MsgBox(0, "Fehler", "_FTP_Open:@error" & @error)
Return
EndIf
Local $Conn = _FTP_Connect($Open, $server, $username, $pass, 1)
If $Conn = 0 Then
MsgBox(0, "Fehler", "Ftp verbindungsaufbau gescheitert...Fehler:" & @error)
Return
EndIf
If _FTP_DirGetCurrent($Open) = 0 Then
MsgBox(0, "Fehler", "Fehler bei DirGetCurrent:" & @error)
Return
EndIf
If _FTP_DirSetCurrent($Open, "Content") = 0 Then
MsgBox(0, "Fehler", "Fehler DireSetCurrent:" & @error)
Return
EndIf
_Crypt_EncryptFile($Path & $filename, $Path & $cryptedFileName, $cryptPW, $CALG_RC4)
If _FTP_FilePut($Open, $Path & $cryptedFileName, "test") = 0 Then
MsgBox(0, "Fehler", "Datei konnte nicht auf FTP server gespeichert werden.Error:" & @error)
Return
EndIf
Local $Ftpc = _FTP_Close($Open)
EndFunc ;==>
Ich vermute mal das Problem gibt es nicht zum ersten mal. Habe allerdings bisher keine lösung finden könne. Habe bereits passiv und aktiv mode ausprobiert,ohne erfolg.
Was kann es noch sein?