Bonjour. J'ai utiliser un petit bout de code trouvé sur ce forum, mais j'ai un probleme. Voici le code
J'ai cocher "Microsoft Internet Transfer Control" dans les composants du projet et j'ai placez un contôle de ce type sur ma form.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 MousePointer = vbHourglass With Inet1 .AccessType = icDirect .Protocol = icFTP .url = "ftp://" & login & ":" & motdepasse & "@" & url .Execute , "SEND" & source & " " & "/" & destination While .StillExecuting DoEvents Wend .Cancel End With MousePointer = vbNormal
Cependant, rendu au while .StillExecuting, il loop sans arret sans copier le fichier.
Quelqu'un à une idée ?
Partager