S'il y a un nombre appréciable de noms de serveurs à vérifier ou si l'on veut toujours vérifier le serveur, il vaut mieux stocker les noms dans un fichier que de les taper avant chaque exécution du script. Si vous exécutez toujours le script à partir d'un ordinateur, vous pouvez
Lire à partir d’un fichier texte
stocker les noms de serveurs
dans un fichier appelé servers.txt (un nom de serveur
par ligne) puis appeler ce fichier à partir du script. Pour lire
le fichier, utilisez un objet COM VBScript appelé FSO (File
System Object). VBScript ne sait pas interagir avec des fichiers,
mais il sait interagir avec des objets COM. Les FSO
peuvent représenter des fichiers ou des dossiers. Dans ce
cas, vous utiliserez le FSO pour pointer vers le, et lire à partir
du, fichier de texte dans lequel vous avez stocké les noms
de serveurs. Comme le nom du fichier ne changera pas, vous
pouvez le stocker dans le script comme une constante au
lieu d’une variable, comme le montre le listing 4.
Si vous voulez créer un script qui puisse lire des fichiers
provenant de différentes sources sans être obligés de modifier
le script, vous pouvez utiliser comme premier argument
le nom du fichier et, comme second argument, le chemin
conduisant au fichier en question. Définissez simplement la
valeur de INPUT_FILE_NAME égale à Wscript.Arguments(1)
parce que cet argument contiendra le chemin.
Avant de travailler avec la chaîne des noms qui constitueront
la variable sComputerName, vous devez mettre les
noms dans un tableau. Sous la forme la plus simple et la plus
courante, les arrays sont des tableaux de données d’une colonne,
dont les lignes sont identifiées par des numéros d’index
allant de 0 au dernier numéro de ligne
– la limite supérieure du tableau. Vous
pouvez créer un tableau puis le peupler
manuellement ou à partir d’un bloc de
données existant. Dans ce dernier cas, utilisez
la fonction Split pour diviser le
contenu de la variable sComputerName
en tranches, avec le retour chariot/saut de
ligne (vbCrLf) comme délimiteur. Le code
qui convertit le contenu de sComputer-
Name en tableau aComputers se présente
ainsi :
aComputers = Split(sComputerName, vbCrLf
Maintenant que le tableau existe, vous pouvez utiliser
une instruction For Each…Next sur son contenu pour imprimer
le nom de chaque ordinateur et afficher ses services et
leur état.
Téléchargez cette ressource
![Guide des Solutions Cloud & Services Managés Simplifiés](https://www.itpro.fr/wp-content/uploads/2024/05/TOP-5-des-Services-Manages-Simplifies-2024-IT-Experts.jpg)
Guide des Solutions Cloud & Services Managés Simplifiés
Comment capitaliser sur son existant tout en bénéficiant, dès à présent, des promesses de flexibilité et de scalabilité du cloud ? Découvrez les bonnes pratiques pour répondre aux défis de simplification du Cloud dans ce nouveau TOP 5.
Les articles les plus consultés
Les plus consultés sur iTPro.fr
- Menace cyber lors des Jeux Olympiques et Paralympiques 2024
- CyberArk sécurise les identités humaines et machines avec CORA AI
- La généralisation de l’authentification par QR codes et les cyber-risques associés
- Intégrer l’IA dans son service client : les écueils à éviter pour l’IT et les métiers
- Microsoft Patch Tuesday Juillet 2024
![Revue Smart DSI](https://www.itpro.fr/wp-content/uploads/2024/07/SMART-DSI-Numero-34-Juin-2024.jpg)