Visual Basic pour Applications, ou VBA, est une version du langage Visual Basic de Microsoft, intégré dans la suite Office de logiciels de productivité. Les programmes VBA fonctionnent à partir d`un outil de bureau - par exemple, Word - accéder et manipuler les données actuellement gérées par cet outil - par exemple, un document Word. Un programme VBA peut lire son entrée à partir, ou d`écrire ses résultats, les fichiers hébergés sur un serveur distant via le protocole de transfert de fichiers ou FTP. Vous pouvez écrire du code VBA qui instruit le logiciel client FTP - préinstallé par défaut sur votre ordinateur - pour interagir avec les serveurs FTP.
Créer le fichier de commandes FTP avec une liste de commandes que le client FTP exécutera. Le fragment de code VBA suivant crée un tel fichier:
Dim ftpFileHandle As Integer
ftpFileHandle = FreeFile
Ouvrir "ftpCommand.txt" Pour la sortie Comme #ftpFileHandle
Imprimer #ftpFileHandle, "ftpserver.com ouverte"
Imprimer #ftpFileHandle, "identifiant d`utilisateur"
Imprimer #ftpFileHandle, "mot de passe"
Imprimer #ftpFileHandle, "envoyer localfile.xls"
Imprimer #ftpFileHandle, "recv remotefile.doc"
Imprimer #ftpFileHandle, "au revoir"
Fermer #ftpFileHandle
Remplacer "ftpserver.com" avec le nom du serveur FTP, "identifiant d`utilisateur" avec le nom de votre compte dans ce serveur et "mot de passe" avec votre mot de passe. L`exemple de code télécharge une feuille de calcul contenu dans un fichier nommé "localfile.xls" et télécharge un document contenu dans un fichier nommé "remotefile.doc." Vous pouvez utiliser l`une des commandes à partir de la "Liste des commandes FTP" sur le site Web de la NSF Outils avant de fermer la session avec "au revoir."
Créer un lot ou d`un script exécutable, un fichier qui appelle le client FTP pour avoir exécuter le fichier de commandes FTP. Le fragment de code VBA suivant crée un tel fichier:
Dim batFileHandle As Integer
batFileHandle = FreeFile
Ouvrir "doFtp.bat" Pour la sortie Comme #batFileHandle
Imprimer #batFileHandle, "-s ftp: ftpCommand.txt"
Fermer #batFileHandle
Exécutez le fichier de commandes en incluant la ligne suivante dans votre code VBA:
coquille ("doFtp.bat") VbHide ``, vbMinimizedNoFocus
Notez que la ligne contient deux apostrophes, sans aucun caractère entre eux, immédiatement avant la deuxième virgule. Votre programme VBA invoquera le fichier de commandes qui, à son tour, appeler le client FTP et le faire exécuter la séquence de commandes de l`étape 1.
