TextStream permet la création, l'ouverture, la lecture et l'écriture d'un fichier texte.
La création de l'objet TextStream s'effectue de la manière suivante pour VBScript :
Dim fso, objet
Set fso = CreateObject("Scripting.FileSystemObject")
Set objet = fso.CreateTextFile("chemin", True)de la façon suivante pour JScript :
var fso, objet;
fso = new ActiveXObject("Scripting.FileSystemObject");
objet = fso.CreateTextFile("chemin", true);Outre la méthode précitée, il existe deux autres moyens d'ouvrir un fichier en écriture.
par la méthode OpenTextFile() du modèle d'objet FileSystemObject pour VBScript :
Dim fso, objet
Const ForWriting = 2
Set fso = CreateObject("Scripting. FileSystemObject")
Set objet = fso.OpenTextFile("chemin", ForWriting, True)et pour JScript :
var fso, objet;
var ForWriting= 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
objet = fso.OpenTextFile("chemin", ForWriting, true);par la méthode OpenAsTextStream() du modèle d'objet FileSystemObject pour VBScript :
Dim fso, objet_file, objet
Const ForWriting = 2
Set fso = CreateObject("Scripting.FileSystemObject")
fso.CreateTextFile ("chemin")
Set objet_file = fso.GetFile("chemin")
Set objet = objet_file.OpenAsTextStream(ForWriting, True)et pour JScript :
var fso, objet_file, objet;
var ForWriting = 2;
fso = new ActiveXObject("Scripting.FileSystemObject");
fso.CreateTextFile ("chemin");
objet_file = fso.GetFile("chemin");
objet = objet_file.OpenAsTextStream(ForWriting, true);| Propriété |
|---|
| Description |
| AtEndOfLine |
| retourne true si le pointeur du fichier est situé immédiatement avant la marque de fin de ligne dans un fichier TextStream et sinon false. |
| AtEndOfStream |
| retourne true si le pointeur du fichier se situe à la fin d'un fichier TextStream et sinon false. |
| Column |
| retourne le numéro de colonne correspondant à la position du caractère courant dans un fichier TextStream. |
| Line |
| retourne le numéro de la ligne courante dans un fichier TextStream. |
| Méthode |
|---|
| Description |
| Close() |
| ferme un fichier TextStream. |
| Read(nombre) |
| Lit le nombre spécifié de caractères et renvoie la chaîne de caractères. |
| ReadAll() |
| lit un fichier TextStream entier et renvoie la chaîne de caractères. |
| ReadLine() |
| Lit une ligne complète et renvoie la chaîne de caractères obtenues. |
| Skip(nombre) |
| ignore un nombre spécifié de caractères lors de la lecture d'un fichier TextStream. |
| SkipLine |
| Ignore une ligne lors de la lecture d'un fichier TextStream. |
| Write(chaîne) |
| écrit une chaîne de caractères spécifiée dans un fichier TextStream. |
| WriteBlankLines(nombre) |
| écrit un nombre spécifié de caractères de nouvelle ligne dans un fichier TextStream. |
| WriteLine(chaîne) |
| écrit une chaîne de caractères spécifiée et un caractère de nouvelle ligne dans un fichier TextStream. |
<html>
<head>
<title>Démonstration de TextStream</title>
<script language="JScript">
var fso = new ActiveXObject("Scripting.FileSystemObject");
var fichier = fso.CreateTextFile("c:\\essai.txt", true);
function CreeFichier()
{
fichier.Write("Voici un exemple de TextStream.\n");
fichier.WriteLine("Un fichier Essai.txt a été créé"
+ "par la commande CreateTextFile.");
alert("Du texte a bien été écrit \ndans le fichier Essai.txt")
fichier.Close();
}
function VoirTxt()
{
fichier = fso.OpenTextFile("c:\\essai.txt", 1);
var ligne = fichier.ReadLine();
document.write("<u>Voici la première lignedu fichier "
+ "<i>Essai.txt</i> :</u> " + ligne);
fichier.Close();
}
</script>
</head>
<body>
<a href="javascript:CreeFichier()">
Ecrire dans le fichier <i>Essai.txt</i> sur <i>C:</i>
</a><br>
<a href="javascript:VoirTxt()">
Visualiser une partie du texte du fichier <i>Essai.txt</i>.
</a><br>
</body>
</html> |