OpenTextFile est une méthode du langage asp. Elle ouvre le fichier spécifié et renvoie un objet TextStream. Le fichier peut être lu, écrit ou ajouté via cet objet.
OpenTextFile est une méthode en langage asp
Ouvre le fichier spécifié et renvoie un objet TextStream via lequel le fichier peut être lu, écrit ou ajouté.
object.OpenTextFile(filename[, iomode[, create[, format]]])
1. L'éditeur de méthode ouvre le fichier spécifié et renvoie un objet TextStream, via lequel le fichier peut être lu, écrit ou ajouté.
object.OpenTextFile(filename[, iomode[, create[, format]]])
2. Objet d'édition de paramètres
Requis. L'objet doit être le nom d'un FileSystemObject.
nom de fichier
Requis. Expression de chaîne qui spécifie le fichier à ouvrir.
mode io
Facultatif. Il peut s'agir de l'une des trois constantes suivantes : ForReading, ForWriting ou ForAppending.
créer
Facultatif. Valeur booléenne indiquant s'il faut créer un nouveau fichier lorsque le nom de fichier spécifié n'existe pas. La valeur est True si un nouveau fichier est créé, False s'il n'est pas créé. En cas d'omission, aucun nouveau fichier n'est créé.
format
Facultatif. Utilisez l'une des valeurs à trois états pour spécifier le format dans lequel ouvrir le fichier. En cas d'omission, le fichier sera ouvert au format ASCII.
3. Définissez et modifiez le paramètre iomode, qui peut être l'un des paramètres suivants :
Description de la valeur constante
ForReading 1 ouvre le fichier en lecture seule. Ce fichier ne peut pas être écrit.
ForWriting 2 Ouvrir le fichier pour l'écriture
ForAppending 8 ouvre le fichier et commence l'écriture à partir de la fin du fichier.
Le paramètre de format peut être l'un des paramètres suivants :
description de la valeur
TristateTrue ouvre les fichiers au format Unicode.
TristateFalse ouvre le fichier au format ASCII.
TristateUseDefault Ouvre le fichier en utilisant les valeurs par défaut du système.
4. Instructions Modifier Le code suivant illustre comment utiliser la méthode OpenTextFile pour ouvrir un fichier et ajouter du texte :
var fs, a, ForAppending ;
PourAppending = 8 ;
fs = nouveau ActiveXObject(Scripting.FileSystemObject);
//Peut être l'une des trois constantes : ForReading, ForWriting ou ForAppending
//Ils sont respectivement 1, 2, 8
a = fs.OpenTextFile(c://testfile.txt, 2, false);
...
a.Close();
Cas d'utilisation dans le script VBS
Ouvre le fichier spécifié et renvoie un objet TextStream qui peut être lu, écrit ou ajouté au fichier.
objet.OpenTextFile(filename[,iomode[,create[,format]]])
paramètre
objet
Requis. Doit être le nom d'un objet FileSystemObject.
nom de fichier
Requis. Une expression de chaîne spécifiant le nom du fichier à ouvrir.
mode io
Facultatif. Mode d'entrée/sortie, l'une des trois constantes suivantes : ForReading, ForWriting ou ForAppending.
créer
Facultatif. Valeur booléenne indiquant si un nouveau fichier peut être créé lorsque le nom de fichier spécifié n'existe pas. True pour autoriser la création de nouveaux fichiers, False sinon. La valeur par défaut est Faux.
format
Facultatif. Une des trois valeurs Tristate indiquant le format dans lequel ouvrir le fichier. Si ce paramètre est omis, le fichier est ouvert au format ASCII.
Le paramètre iomode peut être l'un des paramètres suivants :
| constante | valeur | décrire |
| PourLecture | 1 | Ouvrez le fichier en mode lecture seule. Ce fichier ne peut pas être écrit. |
| Pour l'écriture | 2 | Ouvrez le fichier en écriture uniquement. Ce fichier ne peut pas être lu. |
| PourAjout | 8 | Ouvrez le fichier et écrivez à la fin du fichier. |
Le paramètre de format peut être l'un des paramètres suivants :
| constante | valeur | décrire |
| TristateUseDefault | -2 | Ouvrez le fichier au format par défaut du système. |
| TristateVrai | -1 | Ouvrez le fichier au format Unicode. |
| TristateFaux | 0 | Ouvrez le fichier au format ASCII. |
Exemples d'utilisation :
- SubOpenTextFileTest
- ConstForReading=1,ForWriting=2,ForAppending=8
- Dimfso,f
- Setfso=CreateObject(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(c:/testfile.txt,ForWriting,True)
- f.Écrivez Salut !
- f.Fermer
- FinSub
- AppelOpenTextFileTest
Une fonction écrite par Wulin.com
- Dimfso
- Setfso=CreateObject(Scripting.FileSystemObject)
- setfn2=fso.GetFile(E:/webroot/vevb/index2.htm)
- flsize2=fn2.taille
- fldate2=fn2.datelastmodified
- setfn=fso.GetFile(E:/webroot/vevb/index.htm)
- flsize1=fn.taille
- fldate1=fn.datelastmodified
- Iffso.FileExists(E:/webroot/vevb/index2.htm)andflsize2>50000andfldate2>fldate1Then
- 'Déterminez la taille du fichier. Si le fichier HTML est régénéré, vous devez déterminer s'il a été mis à jour et le fichier ne peut pas être inférieur à 50 Ko.
- fso.getfile(E:/webroot/vevb/index2.htm).copy(E:/webroot/vevb/index.htm)
- iferr.number=0thenWriteHistory success&now()&..........,log.txt
- fin
- 'Fonction d'écriture de journal
- SubWriteHistory(hisChars,chemin)
- ConstForReading=1,ForAppending=8
- Dimfso,f
- Setfso=CreateObject(Scripting.FileSystemObject)
- Setf=fso.OpenTextFile(chemin,ForAppending,True)
- f.WriteLinehisChars
- f.Fermer
- FinSub