VB - Pb de transfert FTP qui pédale
VB - Pb de transfert FTP qui pédale - VB/VBA/VBS - Programmation
Sujets relatifs:
- Deux index sur la même racine de FTP
- Probleme de transfert avec une application mfc
- RMI et cohérences des transfert
- [Résolu] Batch FTP avec pb de Date
- Transfert de serveur Web à serveur Web
- transfert de valeur dans iframe(javascript)
- Connexion en Vbs à un Ftp
- Transfert de fichiers
- [Résolu] Transfert de base de donnée
- [J2ME] Transfert Midlet - serveur http
Marsh Posté le 24-04-2006 à 21:49:02
Bonjour. voici un bout de code qui me sert à envoyer un fichier sur un serveur FTP
With code.Inet1
.Protocol = icFTP
.RemotePort = 23
.AccessType = icDirect
.URL = "ftp://xxxxxx"
ecran.Etat.Caption = "attente autorisation"
.RequestTimeout = 40
'---------------------------------------------- ' cette opération est rapide
.Execute , "DELETE " & " /" & Fichier2
'----------------------------------------------
Do While code.Inet1.StillExecuting = True
DoEvents
ecran.Etat.Caption = "effacement en cours"
Loop
'----------------------------------------------
ecran.Etat.Caption = "effacement effectué"
'---------------------------------------------- ' par contre ici pour 4 ko ca met facilement 5 minutes
.Execute , "PUT " & Fichier & " /" & Fichier2
'----------------------------------------------
Do While code.Inet1.StillExecuting = True
DoEvents
ecran.Etat.Caption = "envoi en cours"
Loop
'----------------------------------------------
ecran.Etat.Caption = "envoi terminé"
End With
quelqu'un pourrait-il m'aider ?
Merci
---------------
http://www.ypikay.com