Bonjour,
J'ai un petit souci lorsque j'utilise cette fonction trouvée sur le net :
En fait lorsque je clique sur mon bouton tous les parametres sont corrects, mais le fichier n'est que très rarement envoyé sur mon compte ftp... et dans tous les cas, en pas à pas, on passe par MyError, ce qui n'est pas normal en cas de succes...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19 Private Sub VistaButtonSend_Click() On Error GoTo MyError With Inet1 .AccessType = icDirect .Protocol = icFTP .url = "ftp://" & string_login & ":" & string_password & "@" & string_url .Execute , "SEND " & source_file & " " & "/" & dest_file While .StillExecuting DoEvents Wend .Cancel End With MyError: MsgBox "FTP connection or transfer error, please try again." End Sub
Pourriez-vous me debloquer svp ?
Merci d'avance.
Partager