Discussion :

[Nutella13]

Bonsoir

Est-ce qu'il faut enregistrer ce code dans un même fichier?

Si oui pourquoi lorsque je clic dessus il se passe rien ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Dim FSO, File
Set FSO = CreateObject("Scripting.FileSystemObject")
Set File = FSO.OpenTextFile("c:\temp.txt", 2, True)
 
With File
 .WriteLine "open ftp.membres.lycos.fr"
 .WriteLine "USER Identifiant"
 .WriteLine "mot de passe"
 .WriteLine "PUT c:\fichier_a_envoyer.txt"
 .Close
End With
 
Shell "ftp -n -s:c:\temp.txt"

[hackoofr]

Un coup d’œil sur ces deux discussions, pour avoir plus d'idées et construire votre script

• FTP les Bases
• FTP sous VBS pour test débit avec affichage du résultat

[Nutella13]

Un coup d’œil sur ces deux discussions, pour avoir plus d'idées et construire votre script

• FTP les Bases
• FTP sous VBS pour test débit avec affichage du résultat

Merci mais les codes sont trop long et du coup plus compliqué..

Je préfère rester sur ce petit code

Il y a un truc que je comprends pas.. a quoi sert ce fichier c:\temp.txt dans ces 2 lignes?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Set File = FSO.OpenTextFile("c:\temp.txt", 2, True)
Shell "ftp -n -s:c:\temp.txt"

[hackoofr]

Pour comprendre c'est quoi le fichier c:\temp.txt, il suffit de voir le Help de la commande FTP

FTP [-v] [-d] [-i] [-n] [-g] [-s:filename] [-a] [-A] [-x:sendbuffer]
[-r:recvbuffer] [-b:asyncbuffers] [-w:windowsize] [host]

-v Supprime l’affichage des réponses du serveur distant.
-n Supprime la connexion automatique au démarrage.
-i Désactive l’invite s’il y a plusieurs fichiers à transférer.
-d Active le débogage.
-g Désactive le globbing du nom de fichier (cf. commande GLOB).
-s:NomFich Spécifie un fichier texte contenant les commandes FTP ; ces commandes seront automatiquement exécutées après le démarrage de FTP.
-a Utilise n’importe quelle interface locale pour la liaison de
la connexion des données.
-A Connexion en tant qu’anonyme.