Upload FTP avec progressbar sans inet

Bonjour je souhaiterais uploader un fichier sur serveur FTP avec une progressbar sans passer par le composant inet.

J'ai donc utiliser cette méthode :

http://www.developpez.net/forums/d25...-fichiers-ftp/

qui fonctionne très bien mais je souhaite y intégrer une progressbar

Quelqu'un pourrait-il m'aider svp ?

Merci

Bonjour,

Voici le code dont je me sers et qui fonctionne pour moi.
Module modFtp : modFtp.txt

La fonction à utiliser est:

Code:

---

1 2 3

SendFtpFile(strFTPsvr As String, UID As String, Pwd As String, _ strLocalFile As String, strDestFile As String, _ Optional pgBar As Object = Nothing)

---

• strFTPsvr
  Le nom du serveur. Ex: serveur-ftp.com
• UID
  Le nom d'utilisateur.
• Pwd
  Mot de passe de l'utilisateur.
• strLocalFile
  Nom complet du fichier à envoyer. Ex: C:\Documents and Settings\NomUtilisateur\Mes documents\Lefichier.txt
• strDestFile
  Nom complet du fichier de destination sur le serveur ftp. Ex: /annee2012/Lefichier-Avril.txt
  Ou le nom complet du dossier de destination. Ex: /annee212/
• pgBar
  Variable objet sur un contrôle activeX "Microsoft ProgressBar Control".

En espérant que ce code fonctionne pour toi.
A+

C'est tout simplement parfait !


Un grand merci !

Salut,

Je suis conscient que la discussion date mais on ne sait jamais!
Je viens de tomber sur ton code est c'est exactement ce que je recherche.

Simplement ça ne fonctionne pas :
- la progress bar n'apparait jamais
- j'ai le message FtpOpenFile: le délai imparti à l'opération est dépassé

Je viens de vérifier, le fichier a bien été créé sur mon ftp donc la connexion s'est bien réalisée, mais pas le transfert (taille du fichier nulle).

Si jamais quelqu'un a une solution, je suis preneur!

merci d'avance.

Bonne après midi,