Comment lire le contenu d'un fichier texte avec VBScript
Étape 1
Exécutez le Bloc-notes et créez un fichier texte. Écrivez le message suivant dans le fichier texte:
Si vous recevez ce message, vous avez bien terminé la planification de cette tâche.
Étape 2
Enregistrez le fichier que vous venez de créer dans le dossier "C: \ Temp" de votre disque dur et attribuez le nom "TextToRead.txt".
Étape 3
Créez un deuxième nouveau document texte dans le Bloc-notes.
Étape 4
Copiez et collez le code suivant dans le fichier que vous avez créé à l'étape précédente:
Option explicite
Const conForReading = 1
'Déclarer les variables Dim objFSO, objReadFile, content
'Set Objects Set objFSO = CreateObject ("Scripting.FileSystemObject") Définir objReadFile = objFSO.OpenTextFile ("C: \ Temp \ TextToRead.txt", 1, False)
'Lire le contenu du fichier contents = objReadFile.ReadAll
'Fermer le fichier objReadFile.close
'Afficher les résultats contenus wscript.echo
'Objets de nettoyage Définir objFSO = Nothing Définir objReadFile = Nothing
'Quittez le script WScript.Quit ()
Étape 5
Cliquez sur "Fichier" dans la barre d'outils du Bloc-notes et sélectionnez "Enregistrer" dans le menu contextuel. Enregistrez le fichier avec votre code VBScript en tant que "C: \ Temp \ ReadTextFile.vbs", puis quittez le Bloc-notes.
Étape 6
Exécutez votre script VBScript en accédant au dossier "C: \ Temp" de votre disque dur et en double-cliquant sur le fichier "ReadTextFile.vbs". Le message que vous avez écrit dans le fichier texte à l'étape 1 apparaîtra dans une petite fenêtre contextuelle, confirmant que votre programme VBScript a réussi à ouvrir et à lire le fichier. Cliquez sur "OK".